package Test2::IPC::Driver::Files; use strict; use warnings; our $VERSION = '1.302194'; BEGIN { require Test2::IPC::Driver; our @ISA = qw(Test2::IPC::Driver) } use Test2::Util::HashBase qw{tempdir ...

package Tie::Hash; our $VERSION = '1.06'; =head1 NAME Tie::Hash, Tie::StdHash, Tie::ExtraHash - base class definitions for tied hashes =head1 SYNOPSIS package NewHash; require Tie::Hash; @ISA = qw(...

package Tie::Array; use 5.006_001; use strict; use Carp; our $VERSION = '1.07'; # Pod documentation after __END__ below. sub DESTROY { } sub EXTEND { } sub UNSHIFT { scalar shift->SPLICE(0,0,@_) } ...

use strict; package Test::Tester::Capture; our $VERSION = '1.302194'; use Test::Builder; use vars qw( @ISA ); @ISA = qw( Test::Builder ); # Make Test::Tester::Capture thread-safe for ithreads. BEGI...

package Time::gmtime; use strict; use 5.006_001; use Time::tm; our (@ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS, $VERSION); our ( $tm_sec, $tm_min, $tm_hour, $tm_mday, $tm_mon, $tm_year, $tm_wday, $tm_...

package Test::use::ok; use 5.005; our $VERSION = '1.302194'; __END__ =head1 NAME Test::use::ok - Alternative to Test::More::use_ok =head1 SYNOPSIS use ok 'Some::Module'; =head1 DESCRIPTION Accordin...

package Test2::Util::Trace; require Test2::EventFacet::Trace; use warnings; use strict; our @ISA = ('Test2::EventFacet::Trace'); our $VERSION = '1.302194'; 1; __END__ =pod =encoding UTF-8 =head1 NA...

package Unicode::Collate::CJK::Zhuyin; use 5.006; use strict; use warnings; our $VERSION = '1.31'; my %u2p; my $wt = 0x8000; while (<DATA>) { last if /^__END__/; my @c = split; for my $c (@c) { nex...

=over =item $PROGRAM_NAME =item $0 X<$0> X<$PROGRAM_NAME> Contains the name of the program being executed. On some (but not all) operating systems assigning to C<$0> modifies the argument area that...

=over =item @LAST_MATCH_START =item @- X<@-> X<@LAST_MATCH_START> This array holds the offsets of the beginnings of the last successful match and any capture buffers it contains. (See L</Scoping Ru...