use 5.008; package base; use strict 'vars'; our $VERSION = '2.27'; $VERSION =~ tr/_//d; # simplest way to avoid indexing of the package: no package statement sub base::__inc::unhook { @INC = grep !...

package Time::Piece; use strict; use XSLoader (); use Time::Seconds; use Carp; use Time::Local; use Scalar::Util qw/ blessed /; use Exporter (); our @EXPORT = qw( localtime gmtime ); our %EXPORT_TA...

package Test2::Formatter::TAP; use strict; use warnings; our $VERSION = '1.302194'; use Test2::Util qw/clone_io/; use Test2::Util::HashBase qw{ no_numbers handles _encoding _last_fh -made_assertion...

package ExtUtils::Install; use strict; use Config qw(%Config); use Cwd qw(cwd); use Exporter (); use File::Basename qw(dirname); use File::Copy; use File::Path; use File::Spec; our @ISA = ('Exporte...

use 5.006; use strict; use warnings; package CPAN::Meta; our $VERSION = '2.150010'; #pod =head1 SYNOPSIS #pod #pod use v5.10; #pod use strict; #pod use warnings; #pod use CPAN::Meta; #pod use Modul...

=for :stopwords MailingList PODs RWS subcontext =head1 NAME CPAN::Meta::History::Meta_1_4 - Version 1.4 metadata specification for META.yml =head1 PREFACE This is a historical copy of the version 1...

package Test2::API::InterceptResult::Event; use strict; use warnings; our $VERSION = '1.302194'; use List::Util qw/first/; use Test2::Util qw/pkg_to_file/; use Scalar::Util qw/reftype blessed/; use...

package TAP::Formatter::Base; use strict; use warnings; use base 'TAP::Base'; use POSIX qw(strftime); my $MAX_ERRORS = 5; my %VALIDATION_FOR; BEGIN { %VALIDATION_FOR = ( directives => sub { shift; ...

=head2 Pragmatic Modules They work somewhat like compiler directives (pragmata) in that they tend to affect the compilation of your program, and thus will usually work well only when used within a ...

=for comment This document is in Pod format. To read this, use a Pod formatter, like "perldoc perlpod". =head1 NAME X<POD> X<plain old documentation> perlpod - the Plain Old Documentation format =h...