view release on metacpan or search on metacpan
"MetaCPAN::Client" : "0",
"Path::Class::Rule" : "0",
"Pod::Usage" : "0",
"Term::ANSIColor" : "3",
"Term::Encoding" : "0",
"Try::Tiny" : "0",
"perl" : "5.010001"
}
}
},
"release_status" : "stable",
view release on metacpan or search on metacpan
lib/App/cpantimes.pm view on Meta::CPAN
=item L<JSON::PP> Copyright 2007−2011 by Makamaka Hannyaharamitu
=item L<CPAN::Meta> Copyright (c) 2010 by David Golden and Ricardo Signes
=item L<Try::Tiny> Copyright (c) 2009 Yuval Kogman
=item L<parent> Copyright (c) 2007-10 Max Maischein
=item L<Version::Requirements> copyright (c) 2010 by Ricardo Signes
view release on metacpan or search on metacpan
lib/App/cpm/Tutorial.pm view on Meta::CPAN
requires 'Cookie::Baker',
dist => "KAZEBURO/Cookie-Baker-0.08.tar.gz",
mirror => "http://cpan.cpantesters.org/";
# use the full URL
requires 'Try::Tiny', 0.28,
url => "http://backpan.perl.org/authors/id/E/ET/ETHER/Try-Tiny-0.28.tar.gz";
cpm also supports git syntax in cpanfile:
requires 'Carl', git => 'https://github.com/skaji/Carl.git';
view release on metacpan or search on metacpan
t/lib/C2STests.pm view on Meta::CPAN
package # no_index
C2STests;
use Test::More 0.96;
use Try::Tiny 0.09;
use File::Spec::Functions qw( catfile ); # core
use File::Temp 0.19 qw( tempdir );
use Exporter;
our @ISA = qw(Exporter);
view release on metacpan or search on metacpan
lib/App/financeta/data/gemini.pm view on Meta::CPAN
package App::financeta::data::gemini;
use strict;
use warnings;
use 5.10.0;
use Try::Tiny;
use LWP::UserAgent;
use JSON::XS qw(decode_json);
use DateTime;
use App::financeta::utils qw(dumper log_filter);
use Log::Any '$log', filter => \&App::financeta::utils::log_filter;
view release on metacpan or search on metacpan
lib/App/genconf.pm view on Meta::CPAN
use File::Find;
use Getopt::Long qw/ GetOptions :config bundling /;
use Path::Class qw/ file /;
use Template;
use Try::Tiny;
sub new {
my ( $class, $inc ) = @_;
$inc = [@INC] unless ref $inc eq 'ARRAY';
view release on metacpan or search on metacpan
lib/App/gh/API.pm view on Meta::CPAN
use Carp ();
use LWP::UserAgent;
use URI;
use JSON;
use App::gh::Utils;
use Try::Tiny;
use Net::GitHub;
sub new_ua {
my $class = shift;
my $ua = LWP::UserAgent->new; # TODO: make this switchable. better client ? Furl ?
view release on metacpan or search on metacpan
lib/App/highlight.pm view on Meta::CPAN
{
$App::highlight::VERSION = '0.14';
}
use base 'App::Cmd::Simple';
use Try::Tiny;
use Module::Load qw(load);
use Getopt::Long::Descriptive;
my $COLOR_SUPPORT = 1;
my @COLORS;
view release on metacpan or search on metacpan
lib/App/locket.pm view on Meta::CPAN
use Path::Class;
use JSON; my $JSON = JSON->new->pretty;
use YAML::XS();
use File::Temp;
use Term::EditorEdit;
use Try::Tiny;
use String::Util qw/ trim /;
my $usage;
BEGIN {
$usage = <<_END_;
view release on metacpan or search on metacpan
mimi.fatpack view on Meta::CPAN
$fatpacked{"Module/Build/Tiny.pm"} = '#line '.(1+__LINE__).' "'.__FILE__."\"\n".<<'MODULE_BUILD_TINY';
package Module::Build::Tiny;$Module::Build::Tiny::VERSION='0.03';use strict;use warnings;use Exporter 5.57 'import';our@EXPORT=qw/Build Build_PL/;use CPAN::Meta;use ExtUtils::Config 0.003;use ExtUtils::Helpers 0.020 qw/make_executable split_like_sh...
MODULE_BUILD_TINY
$fatpacked{"Test/Fatal.pm"} = '#line '.(1+__LINE__).' "'.__FILE__."\"\n".<<'TEST_FATAL';
use strict;use warnings;package Test::Fatal;$Test::Fatal::VERSION='0.03';use Carp ();use Try::Tiny 0.07;use Exporter 5.57 'import';our@EXPORT=qw(exception);our@EXPORT_OK=qw(exception success dies_ok lives_ok);our ($REAL_TBL,$REAL_CALCULATED_TBL)=(1...
TEST_FATAL
$fatpacked{"Test/TempDir/Tiny.pm"} = '#line '.(1+__LINE__).' "'.__FILE__."\"\n".<<'TEST_TEMPDIR_TINY';
use 5.006002;use strict;use warnings;package Test::TempDir::Tiny;our$VERSION='0.03';use Exporter 5.57 qw/import/;our@EXPORT=qw/tempdir in_tempdir/;use Carp qw/confess/;use Cwd qw/abs_path/;use Errno qw/EEXIST ENOENT/;{no warnings 'numeric';use File...
TEST_TEMPDIR_TINY
$fatpacked{"Try/Tiny.pm"} = '#line '.(1+__LINE__).' "'.__FILE__."\"\n".<<'TRY_TINY';
package Try::Tiny;use 5.006;our$VERSION='0.03';use strict;use warnings;use Exporter 5.57 'import';our@EXPORT=our@EXPORT_OK=qw(try catch finally);use Carp;$Carp::Internal{+__PACKAGE__}++;BEGIN {my$su=$INC{'Sub/Util.pm'}&& defined&Sub::Util::set_subn...
TRY_TINY
$fatpacked{"Win32/DBIODBC.pm"} = '#line '.(1+__LINE__).' "'.__FILE__."\"\n".<<'WIN32_DBIODBC';
package Win32::ODBC;use strict;use DBI;$INC{'Win32/ODBC.pm'}=$INC{'Win32/DBIODBC.pm'}|| 1;sub new {shift;my$connect_line=shift;my$temp_connect_line;$connect_line=~/DSN=\w+/;$temp_connect_line="$&;";if ($connect_line=~/UID=\w?/){$temp_connect_line.=...
WIN32_DBIODBC
view release on metacpan or search on metacpan
lib/App/mookview.pm view on Meta::CPAN
use Text::Markdown::Discount qw/markdown/;
use Text::Xslate qw/mark_raw/;
use Number::Format qw/format_number/;
use File::ShareDir qw/dist_dir/;
use Plack::App::Directory;
use Try::Tiny;
use Encode;
our $VERSION = "0.03";
sub new {
view release on metacpan or search on metacpan
"JSON" : "0",
"Moose" : "0",
"MooseX::Getopt" : "0",
"Net::MQTT::Simple" : "0",
"Template" : "0",
"Try::Tiny" : "0",
"strict" : "0",
"warnings" : "0"
}
},
"test" : {
view release on metacpan or search on metacpan
lib/App/mvr.pm view on Meta::CPAN
use Exporter qw(import);
our @EXPORT = qw(mvr);
use Path::Tiny 0.034;
use Try::Tiny;
use Carp;
our $VERBOSE = 0;
view release on metacpan or search on metacpan
lib/App/perlimports/CLI.pm view on Meta::CPAN
use Getopt::Long::Descriptive qw( describe_options );
use List::Util qw( uniq );
use Log::Dispatch ();
use Path::Iterator::Rule ();
use Path::Tiny qw( path );
use Try::Tiny qw( catch try );
use Types::Standard qw( ArrayRef Bool HashRef InstanceOf Object Str );
has _args => (
is => 'ro',
isa => HashRef,
view release on metacpan or search on metacpan
xt/show_deps_by_metacpan.t view on Meta::CPAN
\tMIME::Types
\tStream::Buffered
\tTest::Pod
\tTest::Requires
\tTest::TCP
\tTry::Tiny
\tURI
\tparent
EOS
};
xt/show_deps_by_metacpan.t view on Meta::CPAN
\tMIME::Types
\tStream::Buffered
\tTest::Pod
\tTest::Requires
\tTest::TCP
\tTry::Tiny
\tURI
EOS
};
subtest 'without some phases' => sub {
my ($got) = capture {
xt/show_deps_by_metacpan.t view on Meta::CPAN
\tHash::MultiValue
\tIO::Handle::Util
\tLWP::UserAgent
\tStream::Buffered
\tTest::TCP
\tTry::Tiny
\tURI
EOS
};
subtest 'without some type' => sub {
my ($got) = capture {
xt/show_deps_by_metacpan.t view on Meta::CPAN
\tHash::MultiValue
\tStream::Buffered
\tTest::Pod
\tTest::Requires
\tTest::TCP
\tTry::Tiny
\tURI
EOS
};
};
};
xt/show_deps_by_metacpan.t view on Meta::CPAN
\tHTTP::Message
\tHash::MultiValue
\tLWP::UserAgent
\tTest::Requires
\tTest::TCP
\tTry::Tiny
\tURI
\tparent
EOS
};
view release on metacpan or search on metacpan
lib/App/podweaver.pm view on Meta::CPAN
use Module::Metadata;
use Pod::Elemental;
use Pod::Elemental::Transformer::Pod5;
use Pod::Weaver;
use PPI::Document;
use Try::Tiny;
our $VERSION = '1.00';
sub FAIL() { 0; }
sub SUCCESS_UNCHANGED() { 1; }
lib/App/podweaver.pm view on Meta::CPAN
$log->warningf( "Unable to parse version in '%s' and " .
"no dist_version supplied", $file )
if $log->is_warning();
}
# Try::Tiny this, it can croak.
try
{
$pod_document = $weaver->weave_document( \%weave_args );
$log->errorf( "weave_document() failed on '%s': No Pod generated",
view release on metacpan or search on metacpan
url: http://module-build.sourceforge.net/META-spec-v1.4.html
version: '1.4'
name: App-pq
requires:
JSON::MaybeXS: '0'
Try::Tiny: '0'
perl: v5.10.0
version: '1'
x_generated_by_perl: v5.32.1
x_serialization_backend: 'YAML::Tiny version 1.73'
x_spdx_expression: 'Artistic-1.0-Perl OR GPL-1.0-or-later'
view release on metacpan or search on metacpan
lib/App/revealup/cli/export.pm view on Meta::CPAN
package App::revealup::cli::export;
use App::revealup::base;
use Pod::Usage;
use Try::Tiny;
use Carp qw/croak/;
has 'sub_commands' => [qw/html theme/];
sub run {
view release on metacpan or search on metacpan
lib/App/wmiirc.pm view on Meta::CPAN
use App::wmiirc::Util;
use File::Which;
use IO::Async::Loop;
use IO::Async::Stream;
use Moo;
use Try::Tiny;
$SIG{PIPE} = 'IGNORE';
our $DEBUG = !!$ENV{WMIIP_DEBUG};
view release on metacpan or search on metacpan
lib/App/wu.pm view on Meta::CPAN
package App::wu;
$App::wu::VERSION = '0.06';
use WWW::Wunderground::API 0.06;
use Cache::FileCache;
use Carp;
use Try::Tiny;
#ABSTRACT: Terminal app that provides an hourly weather forecast using Weather Underground API
view release on metacpan or search on metacpan
0.18 2017-11-14
- Add minimum version for dependencies
- Adds missing dependencies to cpanfile
- Switch from Try::Tiny to Try::Catch
0.17 2017-11-12
- Complete rewrite (NOT backward compatible)
- Message protocol is now encrypted with Rijndael
- Workers now authenticate message source as from manager to which it is
view release on metacpan or search on metacpan
lib/Ark/Context.pm view on Meta::CPAN
package Ark::Context;
use Mouse;
use Scalar::Util ();
use Try::Tiny 0.02;
use URI::WithBase;
our $DETACH = 'ARK_DETACH';
our $DEFERRED = 'ARK_DEFERRED';
our $STREAMING = 'ARK_STREAMING';
view release on metacpan or search on metacpan
lib/Armadito/Agent/Antivirus/Eset.pm view on Meta::CPAN
package Armadito::Agent::Antivirus::Eset;
use strict;
use warnings;
use base 'Armadito::Agent::Antivirus';
use Try::Tiny;
use IPC::System::Simple qw(capture);
sub new {
my ( $class, %params ) = @_;
view release on metacpan or search on metacpan
lib/Art/World.pm view on Meta::CPAN
use Carp qw( carp cluck );
use utf8;
use Config::Tiny;
use List::Util qw( max any );
use Math::Round;
use Try::Tiny;
role Abstraction {
has discourse ( type => Str );
# TODO could be a table in the database
has file! ( type => ArrayRef[ Idea ], );
view release on metacpan or search on metacpan
lib/Arthas/Defaults.pm view on Meta::CPAN
no warnings 'uninitialized';
use utf8;
use feature();
use version;
use Carp qw/carp croak confess cluck/;
use Try::Tiny;
our $VERSION = qv("v5.2.0");
require Exporter;
our @ISA = ('Exporter');
lib/Arthas/Defaults.pm view on Meta::CPAN
use v5.14;
use utf8;
use warnings;
no warnings 'uninitialized';
use Carp qw/carp croak confess cluck/;
use Try::Tiny;
Might change without notice, at any time. DO NOT USE!
=over
lib/Arthas/Defaults.pm view on Meta::CPAN
=item C<use Carp qw/carp croak confess cluck/>
These functions are very useful to show error details better
than that of C<die()> and C<warn()>.
=item C<use Try::Tiny>
L<Try::Tiny> provides minimal C<try/catch/finally> statements,
which make for interesting sugar and a few nice features over
C<eval>.
=back
view release on metacpan or search on metacpan
lib/Articulate/Service.pm view on Meta::CPAN
use Articulate::Response;
use Moo;
with 'Articulate::Role::Service';
use Try::Tiny;
use Scalar::Util qw(blessed);
use Exporter::Declare;
default_exports qw(articulate_service);
view release on metacpan or search on metacpan
lib/Asset/Pack.pm view on Meta::CPAN
use warnings;
package Asset::Pack;
use Path::Tiny 0.069 qw( path ); # path()->visit without broken ref returns
use Try::Tiny qw( try catch );
our $VERSION = '0.000008';
# ABSTRACT: Easily pack assets into Perl Modules that can be fat-packed
view release on metacpan or search on metacpan
"test" : {
"requires" : {
"Config" : "0",
"FindBin" : "0",
"Test::More" : "0",
"Try::Tiny" : "0"
}
}
},
"release_status" : "stable",
"version" : "0.03",
view release on metacpan or search on metacpan
lib/Async/Microservice.pm view on Meta::CPAN
use Moose::Role;
requires qw(get_routes service_name);
use Plack::Request;
use Try::Tiny;
use Path::Class qw(dir file);
use MooseX::Types::Path::Class;
use Path::Router;
use FindBin qw($Bin);
use Async::MicroserviceReq;
view release on metacpan or search on metacpan
bin/canonicalize_bgp.pl view on Meta::CPAN
use Attean;
use Attean::RDF;
use Attean::SimpleQueryEvaluator;
use Data::Dumper;
use Getopt::Long;
use Try::Tiny;
use Digest::SHA qw(sha1_hex);
if (scalar(@ARGV) < 1) {
print STDERR <<"END";
Usage: $0 query.rq