view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Acme/CPANModules/PERLANCAR/Avoided.pm view on Meta::CPAN
module => 'Module::Path',
summary => '',
description => <<'_',
It's a nice little concept and module, and often useful. But the decision like
defaulting to doing abs_path()
(https://rt.cpan.org/Public/Bug/Display.html?id=100979), which complicates the
module, makes its behavior different than Perl's require(), as well as opens the
can of worms of ugly filesytem details, has prompted me to release an
alternative. Module::Path::More also has the options to find .pod and/or .pmc
file, and find all matches instead of the first.
lib/Acme/CPANModules/PERLANCAR/Avoided.pm view on Meta::CPAN
.
Author: L<NEILB|https://metacpan.org/author/NEILB>
It's a nice little concept and module, and often useful. But the decision like
defaulting to doing abs_path()
(https://rt.cpan.org/Public/Bug/Display.html?id=100979), which complicates the
module, makes its behavior different than Perl's require(), as well as opens the
can of worms of ugly filesytem details, has prompted me to release an
alternative. Module::Path::More also has the options to find .pod and/or .pmc
file, and find all matches instead of the first.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Acme/CPANModulesUtil/Bencher.pm view on Meta::CPAN
if ($e->{"bench_$_"}) {
$has_bench_code++;
$p->{$_} = $e->{"bench_$_"};
}
}
for (qw/tags include_by_default/) {
if (exists $e->{"bench_$_"}) {
$p->{$_} = $e->{"bench_$_"};
}
}
if ($has_bench_code || (!@per_function_participants && !$scenario->{datasets})) {
lib/Acme/CPANModulesUtil/Bencher.pm view on Meta::CPAN
],
This routine extract those information and return a L<Bencher> scenario
structure.
This function is not exported by default, but exportable.
Arguments ('*' denotes required arguments):
=over 4
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Acme/CPANModulesUtil/FeatureMatrix.pm view on Meta::CPAN
draw_feature_matrix(%args) -> [$status_code, $reason, $payload, \%result_meta]
Draw features matrix of modules in an Acme::CPANModules::* list.
This function is not exported by default, but exportable.
Arguments ('*' denotes required arguments):
=over 4
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.009"
},
view all matches for this distribution
view release on metacpan or search on metacpan
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
"default_jobs" : 1
}
},
"name" : "@Author::PERLANCAR/@Filter/MakeMaker",
"version" : "6.010"
},
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Acme/Cat/Schroedinger.pm view on Meta::CPAN
my $attr = shift;
my @caller = caller;
return sub {'meow'} unless $caller[0] eq __PACKAGE__;
my %attrs = (
'temperament' => 'cooperative', # cooperative | perverse | random
'kittens' => 'inherit', # inherit | default | random
'mutable' => '1', # 0 | 1 # never usable
%options
);
return $attrs{$attr} if exists $attrs{$attr}; # check caller
my $coopRef = ($attrs{temperament} eq 'cooperative' or ($attrs{temperament} eq 'random' and int(rand(2)) ) )? undef:'';
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Acme/CatFS.pm view on Meta::CPAN
);
option cat_url => (
is => 'ro',
format => 's',
default => sub {
'http://thecatapi.com/api/images/get?format=src&type=jpg'
},
doc => 'url used to find a random pic of a cat (default thecatapi.com)',
);
option cat_file => (
is => 'ro',
format => 's',
default => sub { 'cat.jpg' },
doc => 'name of the file (default is cat.jpg)',
);
option forking => (
is => 'ro',
doc => 'if enable, will fork and exit (default false)',
);
option debug => (
is => 'ro',
doc => 'if enable, will run Fuse::Simple in debug mode (default false)',
);
option cached => (
is => 'ro',
doc => 'if enable, will cached the picture instead choose another each open (default false)',
);
sub _get_cat_picture {
my $self = shift;
state $cached_content;
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Module/Install/AuthorTests.pm view on Meta::CPAN
my ($self, $dirs, $recurse) = @_;
return unless $Module::Install::AUTHOR;
my @tests = $self->tests ? (split / /, $self->tests) : 't/*.t';
# XXX: pick a default, later -- rjbs, 2008-02-24
my @dirs = @$dirs ? @$dirs : Carp::confess "no dirs given to author_tests";
@dirs = grep { -d } @dirs;
if ($recurse) {
require File::Find;
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Acme/ChuckNorris.pm view on Meta::CPAN
no strict 'refs'; ## no critic
*{ caller() . '::round_house_kick_to_the_perl' } = \&round_house_kick_to_the_perl;
*{ caller() . '::round_house_kick_to_the_text' } = \&round_house_kick_to_the_text;
}
my %mostly_defaults = (
'Regex' => 1,
'Binary' => 0,
);
my %defaults_overridable = (
'Gap' => 1,
'InformHandler' => sub { },
'TrailingSpaces' => 1,
);
sub round_house_kick_to_the_text {
require Acme::EyeDrops;
return Acme::EyeDrops::sightly(
{
%defaults_overridable, # allow caller to override these in @_
@_[ 1 .. $#_ ],
( ref( $_[0] ) eq 'SCALAR' ? ( 'SourceString' => ${ $_[0] } ) : ref( $_[0] ) ? ( 'SourceHandle' => $_[0] ) : ( 'SourceFile' => $_[0] ) ),
'ShapeString' => join( '', <DATA> ),
'Shape' => undef,
%mostly_defaults, # not overridable
'Print' => 1,
}
);
}
lib/Acme/ChuckNorris.pm view on Meta::CPAN
require Acme::EyeDrops;
return Acme::EyeDrops::sightly(
{
# allow caller to override the below options in @_
%defaults_overridable,
%mostly_defaults, # overridable
'TrapEvalDie' => 1,
'TrapWarn' => 1,
# allow caller to override the above options in @_
@_[ 1 .. $#_ ],
view all matches for this distribution
view release on metacpan or search on metacpan
bin/coinbase.pl view on Meta::CPAN
print "$prog: NONCE: $nonce\n";
my $base = "https://api.coinbase.com/api";
#my $base = "https://api.coinbase.com";
my $url = "$base/v1/account/balance";
my $default_config_file = $ENV{HOME} . "/.acmecoinbase.ini";
if (!$config_file && -e $default_config_file) {
$config_file = $default_config_file;
}
my $config = Acme::Coinbase::Config->new( );
if ($config_file && -e $config_file) {
$config->config_file($config_file);
$config->read_config();
}
my $api_key = $config->get_param("default", "api_key") || $auth->api_key();
my $api_secret = $config->get_param("default", "api_secret") || $auth->api_secret();
#print "$prog: using API key $api_key\n";
perform_request( $url, $api_key, $api_secret, $verbose );
}
bin/coinbase.pl view on Meta::CPAN
system( $cmd );
print "\n";
} else {
# use LWP::UserAgent
my $ua = LWP::UserAgent->new();
$ua->default_headers->push_header( Accept => "*/*" );
$ua->default_headers->push_header( ACCESS_KEY => $api_key );
$ua->default_headers->push_header( ACCESS_NONCE => $nonce );
$ua->default_headers->push_header( Host => "coinbase.com" );
$ua->default_headers->push_header( Connection => "close" );
$ua->default_headers->push_header( "Content-Type" => "application/json" );
# add ACCESS_SIGNATURE in a request_prepare handler so we can set it knowing the request content
# ... it doesn't matter for GETs though because the content should be blank (like we see in our code)
$ua->add_handler(
request_prepare => sub {
bin/coinbase.pl view on Meta::CPAN
=over 4
=item --config=/dif/coinbase.ini
Set path to an acmecoinbase.ini file.
The will default to ~/.acmecoinbase.ini
This file is expected to have contents like:
[default]
api_key = 123456apikeyfgYZ
api_secret = ZZZ111apisecret333DDD444EEE555ZZ
For now, the [default] part is mandatory.
=item --verbose/--noverbose
Turns on/off verbose mode. (off by default)
=item --use-curl
Use curl instead of perl LWP libraries, for test purposes.
view all matches for this distribution