view release on metacpan or search on metacpan
lib/Acme/CPANLists/Import/PerlAdvent/2016.pm view on Meta::CPAN
package Acme::CPANLists::Import::PerlAdvent::2016;
our $DATE = '2016-12-29'; # DATE
our $VERSION = '0.001'; # VERSION
our @Module_Lists = ({description=>"This list is generated by extracting module names mentioned in [http://perladvent.org/2016/] (retrieved on 2016-12-29). Visit the URL for the full contents.",entries=>[{module=>"Ref::Util"},{module=>"Bencher"},{mod...
1;
# ABSTRACT: Modules mentioned in Perl Advent Calendar 2016
__END__
lib/Acme/CPANLists/Import/PerlAdvent/2016.pm view on Meta::CPAN
This list is generated by extracting module names mentioned in [http://perladvent.org/2016/] (retrieved on 2016-12-29). Visit the URL for the full contents.
=over
=item * L<Ref::Util>
=item * L<Bencher>
=item * L<Bencher::Scenario::LevenshteinModules>
view release on metacpan or search on metacpan
lib/Acme/CPANLists/Import/PerlDancerAdvent/2016.pm view on Meta::CPAN
package Acme::CPANLists::Import::PerlDancerAdvent::2016;
our $DATE = '2017-01-31'; # DATE
our $VERSION = '0.001'; # VERSION
our @Module_Lists = ({description=>"This list is generated by extracting module names mentioned in [http://advent.perldancer.org/2016/] (retrieved on 2017-01-31). Visit the URL for the full contents.",entries=>[{module=>"HTTP::Headers::Fast"},{module...
1;
# ABSTRACT: Modules mentioned in PerlDancer Advent Calendar 2016
__END__
lib/Acme/CPANLists/Import/PerlDancerAdvent/2016.pm view on Meta::CPAN
=item * L<Dancer2::Plugin::Auth::Tiny>
=item * L<Try::Tiny>
=item * L<Ref::Util>
=item * L<Dancer2::Core::Role::SessionFactory::File>
=item * L<Dancer2::Session::JSON>
view release on metacpan or search on metacpan
lib/Acme/CPANModules/XSVersions.pm view on Meta::CPAN
{module => 'PerlX::ArraySkip', xs_module => 'PerlX::ArraySkip::XS'},
{module => 'PerlX::Maybe', xs_module => 'PerlX::Maybe::XS'},
{module => 'PPI', xs_module => 'PPI::XS'},
{module => 'Protocol::Redis', xs_module => 'Protocol::Redis::XS'},
{module => 'Readonly', xs_module => 'Readonly::XS'},
{module => 'Ref::Util', xs_module => 'Ref::Util::XS'},
{module => 'Set::IntSpan::Fast', xs_module => 'Set::IntSpan::Fast::XS'},
{module => 'Set::Product', xs_module => 'Set::Product::XS'},
{module=>'SOAP::WSDL::Deserializer::XSD', xs_module=>'SOAP::WSDL::Deserializer::XSD_XS'},
{module => 'Sort::Naturally', xs_module => 'Sort::Naturally::XS'},
{module => 'String::Numeric', xs_module => 'String::Numeric::XS'},
lib/Acme/CPANModules/XSVersions.pm view on Meta::CPAN
Author: L<SANKO|https://metacpan.org/author/SANKO>
XS module: L<Readonly::XS>
=item L<Ref::Util>
Author: L<ARC|https://metacpan.org/author/ARC>
XS module: L<Ref::Util::XS>
=item L<Set::IntSpan::Fast>
Author: L<ANDYA|https://metacpan.org/author/ANDYA>
view release on metacpan or search on metacpan
lib/Acme/CPANModules/Import/PerlAdvent/2016.pm view on Meta::CPAN
our $VERSION = '0.001'; # VERSION
our $LIST = {
description => "This list is generated by extracting module names mentioned in [http://perladvent.org/2016/] (retrieved on 2016-12-29). Visit the URL for the full contents.",
entries => [
{ module => "Ref::Util" },
{ module => "Bencher" },
{ module => "Bencher::Scenario::LevenshteinModules" },
{ module => "Bencher::Tiny" },
{ module => "Benchmark" },
{ module => "Dist::Zilla" },
lib/Acme/CPANModules/Import/PerlAdvent/2016.pm view on Meta::CPAN
=head1 INCLUDED MODULES
=over
=item * L<Ref::Util>
=item * L<Bencher>
=item * L<Bencher::Scenario::LevenshteinModules>
view release on metacpan or search on metacpan
lib/Acme/CPANModules/Import/PerlDancerAdvent/2016.pm view on Meta::CPAN
{ module => "HTTP::Headers" },
{ module => "Plack::Middleware::Cache" },
{ module => "YAML" },
{ module => "Dancer2::Plugin::Auth::Tiny" },
{ module => "Try::Tiny" },
{ module => "Ref::Util" },
{ module => "Dancer2::Core::Role::SessionFactory::File" },
{ module => "Dancer2::Session::JSON" },
{ module => "Dancer2::Session::YAML" },
{ module => "Dancer2::Plugin::SendAs" },
{ module => "Dancer2::Core::App" },
lib/Acme/CPANModules/Import/PerlDancerAdvent/2016.pm view on Meta::CPAN
=item * L<Dancer2::Plugin::Auth::Tiny>
=item * L<Try::Tiny>
=item * L<Ref::Util>
=item * L<Dancer2::Core::Role::SessionFactory::File>
=item * L<Dancer2::Session::JSON>
view release on metacpan or search on metacpan
lib/Acme/DependOnEverything.pm view on Meta::CPAN
use Ref::Explicit;
use Reflex;
use Ref::List;
use Refpmgz;
use Ref::Store;
use Ref::Util;
use Ref::Util::Rewriter;
use Ref::Util::XS;
use Regexp::Assemble::Compressed;
use Regexp::Assemble::tgz;
use Regexp::Bind;
use Regexp::Box;
use Regexp::CharClasses;
view release on metacpan or search on metacpan
script/gen-generic-ind-company-names view on Meta::CPAN
#use strict;
#use warnings;
#use utf8;
#use parent 'Exporter';
#use Carp qw/ croak /;
#use Ref::Util 0.202 qw/ is_arrayref /;
#use String::TtyLength 0.02 qw/ tty_width /;
#
#our @EXPORT_OK = qw/ generate_table /;
#
## Legacy package globals, that can be used to customise the look.
view release on metacpan or search on metacpan
lib/Acrux/RefUtil.pm view on Meta::CPAN
See C<TODO> file
=head1 SEE ALSO
L<Data::Util::PurePerl>, L<Params::Classify>, L<Ref::Util>, L<CTK::TFVals>, L<CTK::ConfGenUtil>
=head1 AUTHOR
Serż Minus (Sergey Lepenkov) L<https://www.serzik.com> E<lt>abalama@cpan.orgE<gt>
view release on metacpan or search on metacpan
"Log::LogMethods" : "1.0",
"Modern::Perl" : "1.20170117",
"Moo" : "2.003002",
"MooX::Types::MooseLike::Base" : "0.29",
"Net::SSLeay" : "1.84",
"Ref::Util" : "0.203",
"Scalar::Util" : "1.48",
"Test::More" : "1.302073",
"Time::HiRes" : "1.9741",
"URI::Escape" : "3.31",
"namespace::clean" : "0.27",
view release on metacpan or search on metacpan
lib/AnyEvent/HTTP/Spark.pm view on Meta::CPAN
use Moo;
use MooX::Types::MooseLike::Base qw(:all);
use Data::Dumper;
use JSON qw(to_json from_json);
use HTTP::Request::Common qw(POST);
use Ref::Util qw(is_plain_arrayref is_plain_hashref);
use URI::Escape qw(uri_escape_utf8);
use namespace::clean;
use Scalar::Util qw(looks_like_number);
use AnyEvent;
view release on metacpan or search on metacpan
cpanfile.snapshot view on Meta::CPAN
PPIx::Utils::Classification 0
Path::Iterator::Rule 0
Path::Tiny 0
Perl::Tidy 20220613
Pod::Usage 0
Ref::Util 0
Scalar::Util 0
Sereal::Decoder 0
Sereal::Encoder 0
Sub::HandlesVia 0
Symbol::Get 0.10
cpanfile.snapshot view on Meta::CPAN
File::XDG 1.03
requirements:
ExtUtils::MakeMaker 0
File::Path 2.07
Path::Tiny 0
Ref::Util 0
perl 5.006
File-chdir-0.1011
pathname: D/DA/DAGOLDEN/File-chdir-0.1011.tar.gz
provides:
File::chdir 0.1011
cpanfile.snapshot view on Meta::CPAN
Module::Build::Tiny 0.035
perl 5.005
Ref-Util-0.204
pathname: A/AR/ARC/Ref-Util-0.204.tar.gz
provides:
Ref::Util 0.204
Ref::Util::PP 0.204
requirements:
Exporter 5.57
ExtUtils::MakeMaker 0
Ref::Util::XS 0
Text::ParseWords 0
perl 5.006
Ref-Util-XS-0.117
pathname: X/XS/XSAWYERX/Ref-Util-XS-0.117.tar.gz
provides:
Ref::Util::XS 0.117
requirements:
Exporter 5.57
ExtUtils::MakeMaker 0
XSLoader 0
perl 5.006
view release on metacpan or search on metacpan
lib/App/Dothe.pm view on Meta::CPAN
isa => 'HashRef',
builder => '_build_vars',
init_arg => undef,
);
use Ref::Util qw/ is_arrayref is_hashref /;
sub render($self,$template,$vars) {
if( is_arrayref $template ) {
return [ map { $self->render($_,$vars) } @$template ];
}
view release on metacpan or search on metacpan
lib/App/ElasticSearch/Utilities.pm view on Meta::CPAN
use Hash::Merge::Simple qw(clone_merge);
use IPC::Run3;
use JSON::MaybeXS;
use LWP::UserAgent;
use Net::Netrc;
use Ref::Util qw(is_ref is_arrayref is_hashref);
use Time::Local;
use URI;
use URI::QueryParam;
use YAML::XS ();
view release on metacpan or search on metacpan
lib/ChordPro/Config.pm view on Meta::CPAN
use File::Spec;
use Scalar::Util qw(reftype);
use List::Util qw(any);
use Storable 'dclone';
use Hash::Util;
use Ref::Util qw( is_arrayref is_hashref );
#sub hmerge($$;$);
#sub clone($);
#sub default_config();
view release on metacpan or search on metacpan
t/002_index_route.t view on Meta::CPAN
use App::Mxpress::PDF;
use Test::More tests => 2;
use Plack::Test;
use HTTP::Request::Common;
use Ref::Util qw<is_coderef>;
my $app = App::Mxpress::PDF->to_app;
ok( is_coderef($app), 'Got app' );
my $test = Plack::Test->create($app);
view release on metacpan or search on metacpan
lib/App/Oozie/Deploy.pm view on Meta::CPAN
use File::Spec;
use File::Temp ();
use List::MoreUtils qw( uniq );
use List::Util qw( max );
use Path::Tiny qw( path );
use Ref::Util qw( is_arrayref is_hashref );
use Sys::Hostname ();
use Template;
use Text::Glob qw(
match_glob
glob_to_regex
view release on metacpan or search on metacpan
lib/App/Spec/Plugin/Format.pm view on Meta::CPAN
use warnings;
package App::Spec::Plugin::Format;
our $VERSION = 'v0.15.0'; # VERSION
use YAML::PP;
use Ref::Util qw/ is_arrayref /;
use Encode;
use Moo;
with 'App::Spec::Role::Plugin::GlobalOptions';
view release on metacpan or search on metacpan
script/chinese-zodiac-of view on Meta::CPAN
#use strict;
#use warnings;
#use utf8;
#use parent 'Exporter';
#use Carp qw/ croak /;
#use Ref::Util qw/ is_arrayref is_ref /;
#our @EXPORT_OK = qw/ generate_table /;
#
## Legacy package globals, that can be used to customise the look.
## These are only used in the "classic" style.
## I wish I could drop them, but I don't want to break anyone's code.
view release on metacpan or search on metacpan
script/genpw-ind view on Meta::CPAN
#use strict;
#use warnings;
#use utf8;
#use parent 'Exporter';
#use Carp qw/ croak /;
#use Ref::Util 0.202 qw/ is_arrayref /;
#use String::TtyLength 0.02 qw/ tty_width /;
#
#our @EXPORT_OK = qw/ generate_table /;
#
## Legacy package globals, that can be used to customise the look.
view release on metacpan or search on metacpan
script/metasyn view on Meta::CPAN
#use strict;
#use warnings;
#use utf8;
#use parent 'Exporter';
#use Carp qw/ croak /;
#use Ref::Util 0.202 qw/ is_arrayref /;
#use String::TtyLength 0.02 qw/ tty_width /;
#
#our @EXPORT_OK = qw/ generate_table /;
#
## Legacy package globals, that can be used to customise the look.
view release on metacpan or search on metacpan
lib/App/perlimports/Document.pm view on Meta::CPAN
use PPIx::Utils::Classification qw(
is_function_call
is_hash_key
is_method_call
);
use Ref::Util qw( is_plain_arrayref is_plain_hashref );
use Scalar::Util qw( refaddr );
use Sub::HandlesVia;
use Text::Diff ();
use Try::Tiny qw( catch try );
use Types::Standard qw( ArrayRef Bool HashRef InstanceOf Maybe Object Str );
view release on metacpan or search on metacpan
eg/t/002_index_route.t view on Meta::CPAN
use Site;
use Test::More tests => 2;
use Plack::Test;
use HTTP::Request::Common;
use Ref::Util qw<is_coderef>;
my $app = Site->to_app;
ok( is_coderef($app), 'Got app' );
my $test = Plack::Test->create($app);
view release on metacpan or search on metacpan
lib/Archive/Libarchive/Compress.pm view on Meta::CPAN
package Archive::Libarchive::Compress 0.01 {
use Carp ();
use Path::Tiny ();
use File::chdir;
use Ref::Util qw( is_ref is_plain_scalarref is_plain_coderef );
use Archive::Libarchive 0.04 qw( ARCHIVE_OK ARCHIVE_WARN );
use FFI::C::Stat;
# ABSTRACT: Recursively archive a directory (using libarchive)
view release on metacpan or search on metacpan
lib/Archive/Libarchive/Extract.pm view on Meta::CPAN
package Archive::Libarchive::Extract;
use strict;
use warnings;
use Archive::Libarchive 0.04 qw( ARCHIVE_OK ARCHIVE_WARN ARCHIVE_EOF ARCHIVE_EXTRACT_TIME ARCHIVE_EXTRACT_PERM ARCHIVE_EXTRACT_ACL ARCHIVE_EXTRACT_FFLAGS );
use Ref::Util qw( is_plain_coderef is_plain_arrayref is_plain_scalarref is_ref );
use Carp ();
use File::chdir;
use Path::Tiny ();
use 5.020;
use experimental qw( signatures postderef );
view release on metacpan or search on metacpan
lib/Archive/Libarchive/Peek.pm view on Meta::CPAN
package Archive::Libarchive::Peek;
use strict;
use warnings;
use Archive::Libarchive 0.03 qw( ARCHIVE_OK ARCHIVE_WARN ARCHIVE_EOF );
use Ref::Util qw( is_plain_coderef is_plain_arrayref is_plain_scalarref is_ref );
use Carp ();
use Path::Tiny ();
use 5.020;
use Alias::Any;
use experimental qw( signatures postderef );
view release on metacpan or search on metacpan
lib/Archive/Libarchive/Unwrap.pm view on Meta::CPAN
package Archive::Libarchive::Unwrap;
use strict;
use warnings;
use Archive::Libarchive qw( ARCHIVE_OK ARCHIVE_WARN ARCHIVE_EOF );
use Ref::Util qw( is_ref );
use 5.020;
use Carp ();
use experimental qw( signatures );
# ABSTRACT: Unwrap files with multiple compression / encoding formats
view release on metacpan or search on metacpan
lib/Archive/Libarchive/ArchiveRead.pm view on Meta::CPAN
use warnings;
use 5.020;
use Archive::Libarchive::Lib;
use FFI::Platypus::Buffer qw( scalar_to_buffer scalar_to_pointer grow set_used_length window );
use FFI::Platypus::Memory qw( strdup free );
use Ref::Util qw( is_plain_scalarref is_plain_coderef is_blessed_ref is_plain_arrayref );
use Carp ();
use Scalar::Util qw( refaddr );
use experimental qw( signatures );
use parent qw( Archive::Libarchive::Archive );
use constant;
view release on metacpan or search on metacpan
lib/Astro/FITS/CFITSIO/FileName.pm view on Meta::CPAN
our $VERSION = '0.08';
use Types::Standard qw[ Str ArrayRef StrMatch Enum Bool Optional Dict ];
use Types::Common::Numeric qw[ PositiveOrZeroInt PositiveInt ];
use Scalar::Util qw[ blessed ];
use Ref::Util qw[ is_arrayref ];
use Astro::FITS::CFITSIO::FileName::Regexp -all;
sub _croak {
require Carp;
view release on metacpan or search on metacpan
lib/Bencher/Scenario/Ref/Util.pm view on Meta::CPAN
package Bencher::Scenario::Ref::Util;
use 5.010001;
use strict;
use warnings;
lib/Bencher/Scenario/Ref/Util.pm view on Meta::CPAN
our $DATE = '2024-12-04'; # DATE
our $DIST = 'Bencher-ScenarioBundle-Ref-Util'; # DIST
our $VERSION = '0.003'; # VERSION
our $scenario = {
summary => 'Benchmark Ref::Util',
precision => 0.001,
participants => [
{
name=>'is_arrayref',
module => 'Ref::Util',
code_template => 'no warnings "void"; state $ref = []; Ref::Util::is_arrayref($ref) for 1..1000',
},
{
name=>'is_plain_arrayref',
module => 'Ref::Util',
code_template => 'no warnings "void"; state $ref = []; Ref::Util::is_plain_arrayref($ref) for 1..1000',
},
{
name=>'ref(ARRAY)',
code_template => 'no warnings "void"; state $ref = []; ref($ref) eq "ARRAY" for 1..1000',
},
lib/Bencher/Scenario/Ref/Util.pm view on Meta::CPAN
},
],
};
1;
# ABSTRACT: Benchmark Ref::Util
__END__
=pod
=encoding UTF-8
=head1 NAME
Bencher::Scenario::Ref::Util - Benchmark Ref::Util
=head1 VERSION
This document describes version 0.003 of Bencher::Scenario::Ref::Util (from Perl distribution Bencher-ScenarioBundle-Ref-Util), released on 2024-12-04.
=head1 SYNOPSIS
To run benchmark with default option:
% bencher -m Ref::Util
To run module startup overhead benchmark:
% bencher --module-startup -m Ref::Util
For more options (dump scenario, list/include/exclude/add participants, list/include/exclude/add datasets, etc), see L<bencher> or run C<bencher --help>.
=head1 DESCRIPTION
lib/Bencher/Scenario/Ref/Util.pm view on Meta::CPAN
=head1 BENCHMARKED MODULES
Version numbers shown below are the versions used when running the sample benchmark.
L<Ref::Util> 0.204
L<Scalar::Util> 1.63
=head1 BENCHMARK PARTICIPANTS
lib/Bencher/Scenario/Ref/Util.pm view on Meta::CPAN
=item * is_arrayref (perl_code)
Code template:
no warnings "void"; state $ref = []; Ref::Util::is_arrayref($ref) for 1..1000
=item * is_plain_arrayref (perl_code)
Code template:
no warnings "void"; state $ref = []; Ref::Util::is_plain_arrayref($ref) for 1..1000
=item * ref(ARRAY) (perl_code)
lib/Bencher/Scenario/Ref/Util.pm view on Meta::CPAN
Run on: perl: I<< v5.40.0 >>, CPU: I<< 12th Gen Intel(R) Core(TM) i7-1250U (10 cores) >>, OS: I<< GNU/Linux Debian version 12 >>, OS kernel: I<< Linux version 6.1.0-26-amd64 >>.
Benchmark command (default options):
% bencher -m Ref::Util
Result formatted as table:
#table1#
+-------------------+-----------+-----------+-----------------------+-----------------------+---------+---------+
lib/Bencher/Scenario/Ref/Util.pm view on Meta::CPAN
=head2 Sample benchmark #2
Benchmark command (benchmarking module startup overhead):
% bencher -m Ref::Util --module-startup
Result formatted as table:
#table2#
+---------------------+-----------+-------------------+-----------------------+-----------------------+---------+---------+
| participant | time (ms) | mod_overhead_time | pct_faster_vs_slowest | pct_slower_vs_fastest | errors | samples |
+---------------------+-----------+-------------------+-----------------------+-----------------------+---------+---------+
| Ref::Util | 7.6 | 4 | 0.00% | 111.74% | 1.1e-05 | 9461 |
| Scalar::Util | 7.2 | 3.6 | 5.56% | 100.58% | 7.9e-06 | 9402 |
| perl -e1 (baseline) | 3.6 | 0 | 111.74% | 0.00% | 3.5e-06 | 3802 |
+---------------------+-----------+-------------------+-----------------------+-----------------------+---------+---------+
lib/Bencher/Scenario/Ref/Util.pm view on Meta::CPAN
R:U 131.6/s -- -5% -52%
S:U 138.9/s 5% -- -50%
perl -e1 (baseline) 277.8/s 111% 100% --
Legends:
R:U: mod_overhead_time=4 participant=Ref::Util
S:U: mod_overhead_time=3.6 participant=Scalar::Util
perl -e1 (baseline): mod_overhead_time=0 participant=perl -e1 (baseline)
To display as an interactive HTML table on a browser, you can add option C<--format html+datatables>.
view release on metacpan or search on metacpan
lib/Bencher/Scenario/RefUtil.pm view on Meta::CPAN
use 5.010001;
use strict;
use warnings;
our $scenario = {
summary => 'Benchmark Ref::Util',
precision => 0.001,
participants => [
{
name=>'is_arrayref',
module => 'Ref::Util',
code_template => 'no warnings "void"; state $ref = []; Ref::Util::is_arrayref($ref) for 1..1000',
},
{
name=>'is_plain_arrayref',
module => 'Ref::Util',
code_template => 'no warnings "void"; state $ref = []; Ref::Util::is_plain_arrayref($ref) for 1..1000',
},
{
name=>'ref(ARRAY)',
code_template => 'no warnings "void"; state $ref = []; ref($ref) eq "ARRAY" for 1..1000',
},
lib/Bencher/Scenario/RefUtil.pm view on Meta::CPAN
},
],
};
1;
# ABSTRACT: Benchmark Ref::Util
__END__
=pod
=encoding UTF-8
=head1 NAME
Bencher::Scenario::RefUtil - Benchmark Ref::Util
=head1 VERSION
This document describes version 0.002 of Bencher::Scenario::RefUtil (from Perl distribution Bencher-Scenarios-RefUtil), released on 2017-01-25.
lib/Bencher/Scenario/RefUtil.pm view on Meta::CPAN
=head1 BENCHMARKED MODULES
Version numbers shown below are the versions used when running the sample benchmark.
L<Ref::Util> 0.101
L<Scalar::Util> 1.45
=head1 BENCHMARK PARTICIPANTS
lib/Bencher/Scenario/RefUtil.pm view on Meta::CPAN
=item * is_arrayref (perl_code)
Code template:
no warnings "void"; state $ref = []; Ref::Util::is_arrayref($ref) for 1..1000
=item * is_plain_arrayref (perl_code)
Code template:
no warnings "void"; state $ref = []; Ref::Util::is_plain_arrayref($ref) for 1..1000
=item * ref(ARRAY) (perl_code)
lib/Bencher/Scenario/RefUtil.pm view on Meta::CPAN
#table2#
+---------------------+------------------------------+--------------------+----------------+-----------+------------------------+------------+---------+---------+
| participant | proc_private_dirty_size (kB) | proc_rss_size (MB) | proc_size (MB) | time (ms) | mod_overhead_time (ms) | vs_slowest | errors | samples |
+---------------------+------------------------------+--------------------+----------------+-----------+------------------------+------------+---------+---------+
| Scalar::Util | 844 | 4.17 | 16 | 9.14 | 4.14 | 1 | 8.8e-06 | 1016 |
| Ref::Util | 1016 | 4.36 | 18.1 | 8.7 | 3.7 | 1.05 | 8.5e-06 | 836 |
| perl -e1 (baseline) | 1016 | 4.37 | 18.1 | 5 | 0 | 1.83 | 4.8e-06 | 290 |
+---------------------+------------------------------+--------------------+----------------+-----------+------------------------+------------+---------+---------+
To display as an interactive HTML table on a browser, you can add option C<--format html+datatables>.