view release on metacpan or search on metacpan
lib/AnyEvent/Retry.pm view on Meta::CPAN
use Moose;
use MooseX::Types::Common::Numeric qw(PositiveNum);
use AnyEvent::Retry::Types qw(Interval);
use AnyEvent;
use Try::Tiny;
use Scalar::Util qw(weaken);
use true;
use namespace::autoclean;
view release on metacpan or search on metacpan
lib/AnyEvent/SlackRTM.pm view on Meta::CPAN
use AnyEvent;
use AnyEvent::WebSocket::Client 0.12;
use Carp;
use Furl;
use JSON;
use Try::Tiny;
our $START_URL = 'https://slack.com/api/rtm.connect';
sub new {
view release on metacpan or search on metacpan
lib/AnyEvent/Subprocess/Easy.pm view on Meta::CPAN
use warnings;
use AnyEvent;
use AnyEvent::Subprocess;
use Try::Tiny;
use Sub::Exporter -setup => {
exports => ['qx_nonblock'],
};
view release on metacpan or search on metacpan
t/streaming.t view on Meta::CPAN
use AnyEvent::Util qw(guard);
use Data::Dumper;
use JSON;
use Test::More;
use Test::TCP;
use Test::Requires qw(Plack::Builder Plack::Handler::Twiggy Try::Tiny);
use Test::Requires { 'Plack::Request' => '0.99' };
my @pattern = (
{
method => 'sample',
view release on metacpan or search on metacpan
lib/AnyEvent/WebSocket/Server.pm view on Meta::CPAN
use strict;
use warnings;
use Carp;
use AnyEvent::Handle;
use Protocol::WebSocket::Handshake::Server;
use Try::Tiny;
use AnyEvent::WebSocket::Connection;
our $VERSION = "0.10";
sub new {
view release on metacpan or search on metacpan
lib/AnyEvent/ZeroMQ/Handle.pm view on Meta::CPAN
use AnyEvent::ZeroMQ::Types qw(IdentityStr);
use ZeroMQ::Raw::Constants qw(ZMQ_NOBLOCK ZMQ_IDENTITY);
use Params::Util qw(_CODELIKE);
use Scalar::Util qw(weaken);
use Try::Tiny;
use POSIX qw(EAGAIN EWOULDBLOCK);
use true;
use namespace::autoclean;
view release on metacpan or search on metacpan
lib/AnyMQ/Trait/AMQP.pm view on Meta::CPAN
use File::ShareDir;
use AnyEvent;
use AnyEvent::RabbitMQ;
use JSON;
use Try::Tiny;
use Carp qw(croak carp);
has host => (is => "ro", isa => "Str");
has port => (is => "ro", isa => "Int");
has user => (is => "ro", isa => "Str");
view release on metacpan or search on metacpan
lib/AnyMQ/Trait/Pg.pm view on Meta::CPAN
use Any::Moose 'Role';
use AnyEvent::Pg 0.04;
use JSON;
use Try::Tiny;
has 'debug' => (
is => 'rw',
isa => 'Bool',
default => 0,
view release on metacpan or search on metacpan
lib/AnyMQ/Queue.pm view on Meta::CPAN
package AnyMQ::Queue;
use strict;
use Any::Moose;
use AnyEvent;
use Try::Tiny;
use Scalar::Util qw(weaken refaddr);
use Time::HiRes;
use constant DEBUG => 0;
has id => (is => 'rw', isa => 'Str');
view release on metacpan or search on metacpan
t/Req2PSGI.pm view on Meta::CPAN
package t::Req2PSGI;
use strict;
use warnings;
use URI::Escape ();
use Try::Tiny;
my $TRUE = (1 == 1);
my $FALSE = !$TRUE;
## copy from HTTP::Message::PSGI
view release on metacpan or search on metacpan
"Exporter" : "5",
"Future" : "0",
"Future::HTTP" : "0",
"JSON::XS" : "0",
"Moo" : "2",
"Try::Tiny" : "0",
"perl" : "5.020"
}
},
"test" : {
"requires" : {
view release on metacpan or search on metacpan
lib/App/Adenosine/Plugin/Rainbow.pm view on Meta::CPAN
$App::Adenosine::Plugin::Rainbow::VERSION = '2.002000';
use Moo;
with 'App::Adenosine::Role::FiltersStdErr';
use Module::Runtime 'require_module';
use Try::Tiny;
try {
require_module('Term::ExtendedColor')
} catch {
die <<"ERR"
view release on metacpan or search on metacpan
lib/App/Alice/HTTPD.pm view on Meta::CPAN
use JSON;
use Encode;
use utf8;
use Any::Moose;
use Try::Tiny;
has 'app' => (
is => 'ro',
isa => 'App::Alice',
required => 1,
view release on metacpan or search on metacpan
lib/App/AutoCRUD.pm view on Meta::CPAN
use Plack::Request;
use Plack::Util;
use Carp;
use Scalar::Does qw/does/;
use Clone qw/clone/;
use Try::Tiny;
use YAML::Any qw/Dump/;
use Data::Reach qw/reach/;
use namespace::clean -except => 'meta';
view release on metacpan or search on metacpan
lib/App/BCSSH.pm view on Meta::CPAN
use strictures 1;
our $VERSION = '0.002002';
$VERSION = eval $VERSION;
use Try::Tiny;
use Module::Runtime qw(require_module);
use App::BCSSH::Util qw(command_to_package rc_dir);
use Module::Find ();
sub run_script { exit($_[0]->new(@ARGV)->run ? 0 : 1) }
view release on metacpan or search on metacpan
cpanfile.snapshot view on Meta::CPAN
Sub::HandlesVia 0
Symbol::Get 0.10
TOML::Tiny 0.16
Text::Diff 0
Text::SimpleTable::AutoWidth 0
Try::Tiny 0
Types::Standard 0
feature 0
perl 5.018000
strict 0
utf8 0
cpanfile.snapshot view on Meta::CPAN
Specio::Exporter 0
Specio::Library::Builtins 0
Specio::Library::Numeric 0
Specio::Library::String 0
Sys::Syslog 0.28
Try::Tiny 0
base 0
namespace::autoclean 0
parent 0
perl 5.006
strict 0
cpanfile.snapshot view on Meta::CPAN
TAP::Harness::Env 0
TOML 0.95
Term::ANSIColor 0
Text::MicroTemplate 0.20
Time::Piece 1.16
Try::Tiny 0
URI 0
parent 0
perl 5.010001
version 0
Module-Build-0.4234
cpanfile.snapshot view on Meta::CPAN
Module::Implementation 0.09
requirements:
Carp 0
ExtUtils::MakeMaker 0
Module::Runtime 0.012
Try::Tiny 0
strict 0
warnings 0
Module-Pluggable-6.3
pathname: S/SI/SIMONW/Module-Pluggable-6.3.tar.gz
provides:
cpanfile.snapshot view on Meta::CPAN
File::Spec 0
List::Util 0
Number::Compare 0.02
Scalar::Util 0
Text::Glob 0
Try::Tiny 0
if 0
perl 5.008001
strict 0
warnings 0
warnings::register 0
cpanfile.snapshot view on Meta::CPAN
HTTP::Tiny 0.034
Hash::MultiValue 0.05
Pod::Usage 1.36
Stream::Buffered 0.02
Test::TCP 2.15
Try::Tiny 0
URI 1.59
WWW::Form::UrlEncoded 0.23
parent 0
perl 5.012000
Pod-Markdown-3.400
cpanfile.snapshot view on Meta::CPAN
Role::Tiny::With 0
Scalar::Util 0
Sub::Quote 0
Test::Fatal 0
Test::More 0.96
Try::Tiny 0
XString 0
overload 0
parent 0
perl 5.008
re 0
cpanfile.snapshot view on Meta::CPAN
requirements:
Carp 0
Exporter 5.57
ExtUtils::MakeMaker 6.78
Test::Builder 0
Try::Tiny 0.07
strict 0
warnings 0
Test-LongString-0.17
pathname: R/RG/RGARCIA/Test-LongString-0.17.tar.gz
provides:
cpanfile.snapshot view on Meta::CPAN
requirements:
ExtUtils::MakeMaker 0
Try-Tiny-0.32
pathname: E/ET/ETHER/Try-Tiny-0.32.tar.gz
provides:
Try::Tiny 0.32
requirements:
Carp 0
Exporter 5.57
ExtUtils::MakeMaker 0
constant 0
cpanfile.snapshot view on Meta::CPAN
MIME::Base64 2.1
Module::Load 0
Net::FTP 2.58
Net::HTTP 6.18
Scalar::Util 0
Try::Tiny 0
URI 1.10
URI::Escape 0
WWW::RobotRules 6
parent 0.217
perl 5.008001
view release on metacpan or search on metacpan
0.08 2022-11-01 12:50:08+00:00 UTC
- replace Try::Tiny with Syntax::Keyword::Try
0.07 2017-02-20 03:00:12+00:00 UTC
- switch to dzil
0.06 Wed Jun 1 2016 Binary.com <binary@cpan.org>
view release on metacpan or search on metacpan
lib/App/Basis/ConvertText2.pm view on Meta::CPAN
use strict;
use warnings;
use feature 'state';
use Moo;
use Data::Printer;
use Try::Tiny;
use Path::Tiny;
use Digest::MD5 qw(md5_hex);
use Encode qw(encode_utf8);
use Text::Markdown qw(markdown);
use GD;
view release on metacpan or search on metacpan
lib/App/Basis/Email.pm view on Meta::CPAN
$App::Basis::Email::VERSION = '0.3';
use 5.010;
use warnings;
use strict;
use Moo;
use Try::Tiny;
use Email::Sender::Simple qw(sendmail);
use Email::Sender::Transport::SMTP qw();
use Email::Sender::Transport::Sendmail;
view release on metacpan or search on metacpan
lib/App/Basis/Queue.pm view on Meta::CPAN
use warnings ;
use Moo ;
use MooX::Types::MooseLike::Base qw/InstanceOf HashRef Str/ ;
use JSON ;
use Data::UUID ;
use Try::Tiny ;
use POSIX qw( strftime) ;
use Time::HiRes qw(gettimeofday tv_interval ) ;
use Date::Manip ;
# use Data::Printer ;
view release on metacpan or search on metacpan
lib/App/Basis/Config.pm view on Meta::CPAN
use warnings;
use strict;
use Moo;
use YAML::XS qw( Load Dump);
use Path::Tiny;
use Try::Tiny;
use App::Basis;
# ----------------------------------------------------------------------------
view release on metacpan or search on metacpan
cpanfile.snapshot view on Meta::CPAN
requirements:
Carp 0
Exporter 5.57
ExtUtils::MakeMaker 0
Test::Builder 0
Try::Tiny 0.07
strict 0
warnings 0
Test-Harness-3.34
pathname: L/LE/LEONT/Test-Harness-3.34.tar.gz
provides:
cpanfile.snapshot view on Meta::CPAN
Test::SharedFork 0.06
perl 5.008
Try-Tiny-0.24
pathname: E/ET/ETHER/Try-Tiny-0.24.tar.gz
provides:
Try::Tiny 0.24
requirements:
Carp 0
Exporter 5.57
ExtUtils::MakeMaker 0
constant 0
view release on metacpan or search on metacpan
lib/App/CELL/Load.pm view on Meta::CPAN
cell => 1,
);
}
{
use Try::Tiny;
try {
local *set = sub(@) {
my $number_of_params = scalar @_;
my @params = @_;
my $param;
view release on metacpan or search on metacpan
lib/App/CISetup/AppVeyor/ConfigUpdater.pm view on Meta::CPAN
our $VERSION = '0.19';
use App::CISetup::AppVeyor::ConfigFile;
use App::CISetup::Types qw( Bool Str );
use Try::Tiny;
use Moose;
has email_address => (
is => 'ro',
view release on metacpan or search on metacpan
lib/App/Charon/ConfigLoader.pm view on Meta::CPAN
use Moo;
use warnings NONFATAL => 'all';
use JSONY;
use IO::All;
use Try::Tiny;
use Module::Runtime 'use_module';
use namespace::clean;
has _env_key => (
is => 'ro',
view release on metacpan or search on metacpan
# Can text widget and entry widget are synced (PTk, tie,user module)
perl -MTk -MTk::TextStrings -le '$mw=MainWindow->new; $mw->TextStrings(-height => 2, -variable => \$v)->pack; $mw->Entry(-textvariable => \$v)->pack; MainLoop'
#############################################################
## Perl Modules - Try::Tiny
#############################################################
# Simple approach to catching errors
# Try Catch return are subroutine based. Below return unexpectedly (at first) "BBB"
# WARNING: It has issues. Unpredictable syntax
perl -MTry::Tiny -lE 'sub try_me{ try{1/0}catch{say "Caught [$@]"; return "AAA"}; return "BBB" } $v=try_me; say $v'
# A better try/catch approach (only on lnxbr42)
# WARNING: It has issues. Highly dependent upon Perl changes
perl -MTryCatch -lE 'sub try_me{ try{1/0}catch{say "Caught [$@]"; return "AAA"}; return "BBB" } $v=try_me; say $v'
view release on metacpan or search on metacpan
lib/App/ClusterSSH/Cluster.pm view on Meta::CPAN
use version;
our $VERSION = version->new('0.01');
use Carp;
use Try::Tiny;
use English qw( -no_match_vars );
use base qw/ App::ClusterSSH::Base /;
use App::ClusterSSH::Range;
view release on metacpan or search on metacpan
t/files/indent.snapshot view on Meta::CPAN
Specio::Declare 0
Specio::Exporter 0
Specio::Library::Builtins 0
Specio::Library::Numeric 0
Specio::Library::String 0
Try::Tiny 0
XSLoader 0
base 0
integer 0
namespace::autoclean 0.19
overload 0
t/files/indent.snapshot view on Meta::CPAN
List::Util 1.33
Module::Runtime 0
Params::ValidationCompiler 0.13
Specio::Library::Builtins 0
Specio::Library::String 0
Try::Tiny 0
constant 0
namespace::autoclean 0
parent 0
perl 5.008004
strict 0
t/files/indent.snapshot view on Meta::CPAN
Module::Implementation 0.09
requirements:
Carp 0
ExtUtils::MakeMaker 0
Module::Runtime 0.012
Try::Tiny 0
strict 0
warnings 0
Module-Runtime-0.016
pathname: Z/ZE/ZEFRAM/Module-Runtime-0.016.tar.gz
provides:
t/files/indent.snapshot view on Meta::CPAN
Scalar::Util 0
Storable 0
Sub::Quote 0
Test::Fatal 0
Test::More 0.96
Try::Tiny 0
overload 0
parent 0
perl 5.008
re 0
strict 0
t/files/indent.snapshot view on Meta::CPAN
requirements:
Carp 0
Exporter 5.57
ExtUtils::MakeMaker 0
Test::Builder 0
Try::Tiny 0.07
strict 0
warnings 0
Try-Tiny-0.30
pathname: E/ET/ETHER/Try-Tiny-0.30.tar.gz
provides:
Try::Tiny 0.30
requirements:
Carp 0
Exporter 5.57
ExtUtils::MakeMaker 0
constant 0
view release on metacpan or search on metacpan
scripts/adblock.pl view on Meta::CPAN
use lib "../lib";
use strict;
use warnings;
use App::DNS::Adblock;
use Try::Tiny;
my $timeout = 1; # 1 day timeout
$timeout *= 86400;
my $adfilter = App::DNS::Adblock->new(
view release on metacpan or search on metacpan
script/datapack-modules view on Meta::CPAN
Examples:
Datapack two modules:
% datapack-modules Text::Table::Tiny Try::Tiny
=head1 DESCRIPTION
Both this module and C<Module:FatPack> generate source code that embeds modules'
source codes and load them on-demand via require hook. The difference is that