package Net::netent; use strict; use 5.006_001; our $VERSION = '1.01'; our(@EXPORT, @EXPORT_OK, %EXPORT_TAGS); our ( $n_name, @n_aliases, $n_addrtype, $n_net ); BEGIN { use Exporter (); @EXPORT = q...

require 5; package Pod::Simple::PullParserStartToken; use Pod::Simple::PullParserToken (); use strict; use vars qw(@ISA $VERSION); @ISA = ('Pod::Simple::PullParserToken'); $VERSION = '3.43'; sub ne...

use strict; use warnings; package Memoize::AnyDBM_File; our $VERSION = '1.16'; our @ISA = qw(DB_File GDBM_File Memoize::NDBM_File SDBM_File ODBM_File) unless @ISA; for my $mod (@ISA) { if (eval "re...

=head1 NAME X<data structure> X<complex data structure> X<struct> perldsc - Perl Data Structures Cookbook =head1 DESCRIPTION Perl lets us have complex data structures. You can write something like ...

=head1 NAME perldoc - Look up Perl documentation in Pod format. =head1 SYNOPSIS perldoc [-h] [-D] [-t] [-u] [-m] [-l] [-U] [-F] [-i] [-V] [-T] [-r] [-d destination_file] [-o formatname] [-M Formatt...

=over =item $SUBSCRIPT_SEPARATOR =item $SUBSEP =item $; X<$;> X<$SUBSEP> X<SUBSCRIPT_SEPARATOR> The subscript separator for multidimensional array emulation. If you refer to a hash element as $foo{...

require 5; package I18N::LangTags::List; # Time-stamp: "2004-10-06 23:26:21 ADT" use strict; our (%Name, %Is_Disrec, $Debug); our $VERSION = '0.41'; # POD at the end. #--------- { # read the table ...

package IO::Uncompress::RawInflate ; # for RFC1951 use strict ; use warnings; use bytes; use Compress::Raw::Zlib 2.204 ; use IO::Compress::Base::Common 2.204 qw(:Status ); use IO::Uncompress::Base ...

package IPC::Open3; use strict; no strict 'refs'; # because users pass me bareword filehandles use Exporter 'import'; use Carp; use Symbol qw(gensym qualify); our $VERSION = '1.22'; our @EXPORT = q...

#!perl -w # # Documentation at the __END__ # package File::DosGlob; our $VERSION = '1.12'; use strict; use warnings; require XSLoader; XSLoader::load(); sub doglob { my $cond = shift; my @retval = ...