Var-Pairs

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

         }
      },
      "configure" : {
         "requires" : {
            "ExtUtils::MakeMaker" : "0"
         }
      },
      "runtime" : {
         "requires" : {
            "Devel::Callsite" : "0.06",
            "PadWalker" : "1.93",
            "Scope::Upper" : "0",
            "Test::More" : "0",
            "experimental" : "0"
         }
      }
   },
   "release_status" : "stable",
   "version" : "0.004002",
   "x_serialization_backend" : "JSON::PP version 4.10"
}

META.yml  view on Meta::CPAN

meta-spec:
  url: http://module-build.sourceforge.net/META-spec-v1.4.html
  version: '1.4'
name: Var-Pairs
no_index:
  directory:
    - t
    - inc
requires:
  Devel::Callsite: '0.06'
  PadWalker: '1.93'
  Scope::Upper: '0'
  Test::More: '0'
  experimental: '0'
version: '0.004002'
x_serialization_backend: 'CPAN::Meta::YAML version 0.018'

Makefile.PL  view on Meta::CPAN

    AUTHOR              => 'Damian Conway <DCONWAY@CPAN.org>',
    VERSION_FROM        => 'lib/Var/Pairs.pm',
    ABSTRACT_FROM       => 'lib/Var/Pairs.pm',
    PL_FILES            => {},
    LICENSE             => 'perl',
    PREREQ_PM => {
        'Test::More'      => 0,
        'Devel::Callsite' => 0.06,
        'Scope::Upper'    => 0,
($] < 5.022 ? ('Data::Alias' => 1.16) : ()),
        'PadWalker'       => 1.93,
        'experimental'    => 0,
    },
    dist                => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', },
    clean               => { FILES => 'Var-Pairs-*' },
);

lib/Var/Pairs.pm  view on Meta::CPAN

package Var::Pairs;
use 5.014;

our $VERSION = '0.004002';

use warnings;
no if $] >= 5.018, warnings => "experimental::smartmatch";
use Carp;
use Devel::Callsite;
use Scope::Upper qw< reap UP >;
use PadWalker qw< var_name >;

# Check for autoboxing, and set up pairs() method if applicable..
my $autoboxing;
BEGIN {
    if (eval{ require autobox }) {
        $autoboxing = 1;
        push @Var::Pairs::ISA, 'autobox';

        *Var::Pairs::autobox::pairs        = \&Var::Pairs::pairs;
        *Var::Pairs::autobox::kvs          = \&Var::Pairs::kvs;

lib/Var/Pairs.pm  view on Meta::CPAN

The module requires Perl 5.014 and the following modules:

=over

=item Perl 5.14 or later

=item Devel::Callsite

=item Data::Alias (under Perl 5.20 and earlier)

=item PadWalker

=back

To use the optional C<< $container->pairs >> syntax,
you also need the C<autobox> module.


=head1 INCOMPATIBILITIES

None reported.