use Exporter;
use vars qw(@ISA @EXPORT @EXPORT_OK $VERSION);
-$VERSION = '3.37';
+$VERSION = '3.38';
my $xs_version = $VERSION;
$VERSION = eval $VERSION;
use 5.006_001; # for (defined ref) and $#$v and our
package Dumpvalue;
use strict;
-our $VERSION = '1.16';
+our $VERSION = '1.17';
our(%address, $stab, @stab, %stab, %subs);
# documentation nits, handle complex data structures better by chromatic
use Perl::OSType qw/os_type/;
use vars qw($VERSION @ISA);
-$VERSION = '0.280204';
+$VERSION = '0.280205';
$VERSION = eval $VERSION;
# We only use this once - don't waste a symbol table entry on it.
use ExtUtils::CBuilder::Platform::Unix;
use vars qw($VERSION @ISA);
-$VERSION = '0.280203';
+$VERSION = '0.280204';
@ISA = qw(ExtUtils::CBuilder::Platform::Unix);
sub need_prelink { 1 }
our $VERSION;
BEGIN {
- $VERSION = '3.05';
+ $VERSION = '3.06';
}
use ExtUtils::ParseXS::Constants $VERSION;
use ExtUtils::ParseXS::CountLines $VERSION;
use lib qw( lib );
use ExtUtils::ParseXS::Constants ();
-our $VERSION = '3.05';
+our $VERSION = '3.06';
our (@ISA, @EXPORT_OK);
@ISA = qw(Exporter);
use File::Spec;
@ISA = qw(Tie::Hash Exporter);
-$VERSION = "1.08";
+$VERSION = "1.09";
$VERSION = eval $VERSION;
@EXPORT_OK = qw(DIR_UNLINK);
use vars qw($VERSION @Pagers $Bindir $Pod2man
$Temp_Files_Created $Temp_File_Lifetime
);
-$VERSION = '3.15_07';
+$VERSION = '3.15_08';
#..........................................................................
BEGIN { # Make a DEBUG constant very first thing...
use vars qw($canonical $forgive_me $VERSION);
-$VERSION = '2.33';
+$VERSION = '2.34';
BEGIN {
if (eval { local $SIG{__DIE__}; require Log::Agent; 1 }) {
package if;
-$VERSION = '0.0601';
+$VERSION = '0.0602';
sub work {
my $method = shift() ? 'import' : 'unimport';
@EXPORT_OK = (@{$EXPORT_TAGS{'glob'}}, 'csh_glob');
-$VERSION = '1.14';
+$VERSION = '1.15';
sub import {
require Exporter;
use strict;
our($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS);
-$VERSION = "1.94_02";
+$VERSION = "1.94_03";
=head1 NAME
$DB::subname = ''; # currently executing sub (fullly qualified name)
$DB::lineno = ''; # current line number
- $DB::VERSION = $DB::VERSION = '1.03';
+ $DB::VERSION = $DB::VERSION = '1.04';
# initialize private globals to avoid warnings
require Exporter;
@ISA = qw(Exporter);
@EXPORT = qw(fileparse fileparse_set_fstype basename dirname);
-$VERSION = "2.83";
+$VERSION = "2.84";
fileparse_set_fstype($^O);
@ISA = qw(Exporter);
@EXPORT = qw(getopt getopts);
-$VERSION = '1.06';
+$VERSION = '1.07';
# uncomment the next line to disable 1.03-backward compatibility paranoia
# $STANDARD_HELP_VERSION = 1;
use strict;
use warnings;
use File::Spec;
-our $VERSION = '1.24';
+our $VERSION = '1.25';
use unicore::Name; # mktables-generated algorithmically-defined names
use bytes (); # for $bytes::hint_bits
package overload;
-our $VERSION = '1.15';
+our $VERSION = '1.16';
sub nil {}
use Carp;
-$VERSION = 1.05;
+$VERSION = 1.06;
$Verbose ||= 0;
sub import {