Change 12041 by jhi@alpha on 2001/09/16 20:43:15
Change use|require 5.005_64 to use|require 5.6.1.
Affected files ...
... //depot/perl/ext/Data/Dumper/Dumper.pm#21 edit
... //depot/perl/ext/Devel/DProf/DProf.pm#6 edit
... //depot/perl/ext/IO/lib/IO/File.pm#12 edit
... //depot/perl/ext/IO/lib/IO/Handle.pm#23 edit
... //depot/perl/ext/IO/lib/IO/Pipe.pm#11 edit
... //depot/perl/ext/IO/lib/IO/Seekable.pm#16 edit
... //depot/perl/ext/Opcode/Opcode.pm#24 edit
... //depot/perl/lib/AnyDBM_File.pm#10 edit
... //depot/perl/lib/AutoSplit.pm#29 edit
... //depot/perl/lib/Class/Struct.pm#23 edit
... //depot/perl/lib/Dumpvalue.pm#12 edit
... //depot/perl/lib/ExtUtils/Command.pm#12 edit
... //depot/perl/lib/ExtUtils/Install.pm#29 edit
... //depot/perl/lib/ExtUtils/Installed.pm#10 edit
... //depot/perl/lib/ExtUtils/Liblist.pm#30 edit
... //depot/perl/lib/ExtUtils/Mksymlists.pm#27 edit
... //depot/perl/lib/ExtUtils/Packlist.pm#7 edit
... //depot/perl/lib/Fatal.pm#7 edit
... //depot/perl/lib/FileHandle.pm#13 edit
... //depot/perl/lib/Math/Trig.pm#18 edit
... //depot/perl/lib/Net/Ping.pm#19 edit
... //depot/perl/lib/Net/hostent.pm#10 edit
... //depot/perl/lib/Net/netent.pm#10 edit
... //depot/perl/lib/Net/protoent.pm#11 edit
... //depot/perl/lib/Net/servent.pm#8 edit
... //depot/perl/lib/Shell.pm#13 edit
... //depot/perl/lib/Tie/Array.pm#13 edit
... //depot/perl/lib/Tie/Handle.pm#13 edit
... //depot/perl/lib/Time/gmtime.pm#8 edit
... //depot/perl/lib/Time/localtime.pm#8 edit
... //depot/perl/lib/User/grent.pm#9 edit
... //depot/perl/lib/base.pm#15 edit
... //depot/perl/lib/fields.pm#18 edit
Differences ...
==== //depot/perl/ext/Data/Dumper/Dumper.pm#21 (text) ====
Index: perl/ext/Data/Dumper/Dumper.pm
--- perl/ext/Data/Dumper/Dumper.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/ext/Data/Dumper/Dumper.pm Sun Sep 16 15:00:05 2001
@@ -13,7 +13,7 @@
#$| = 1;
-require 5.005_64;
+require 5.6.1;
require Exporter;
use XSLoader ();
require overload;
==== //depot/perl/ext/Devel/DProf/DProf.pm#6 (text) ====
Index: perl/ext/Devel/DProf/DProf.pm
--- perl/ext/Devel/DProf/DProf.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/ext/Devel/DProf/DProf.pm Sun Sep 16 15:00:05 2001
@@ -1,4 +1,4 @@
-require 5.005_64;
+require 5.6.1;
=head1 NAME
==== //depot/perl/ext/IO/lib/IO/File.pm#12 (text) ====
Index: perl/ext/IO/lib/IO/File.pm
--- perl/ext/IO/lib/IO/File.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/ext/IO/lib/IO/File.pm Sun Sep 16 15:00:05 2001
@@ -103,7 +103,7 @@
=cut
-require 5.005_64;
+require 5.6.1;
use strict;
our($VERSION, @EXPORT, @EXPORT_OK, @ISA);
use Carp;
==== //depot/perl/ext/IO/lib/IO/Handle.pm#23 (text) ====
Index: perl/ext/IO/lib/IO/Handle.pm
--- perl/ext/IO/lib/IO/Handle.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/ext/IO/lib/IO/Handle.pm Sun Sep 16 15:00:05 2001
@@ -247,7 +247,7 @@
=cut
-require 5.005_64;
+require 5.6.1;
use strict;
our($VERSION, @EXPORT_OK, @ISA);
use Carp;
==== //depot/perl/ext/IO/lib/IO/Pipe.pm#11 (text) ====
Index: perl/ext/IO/lib/IO/Pipe.pm
--- perl/ext/IO/lib/IO/Pipe.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/ext/IO/lib/IO/Pipe.pm Sun Sep 16 15:00:05 2001
@@ -6,7 +6,7 @@
package IO::Pipe;
-require 5.005_64;
+require 5.6.1;
use IO::Handle;
use strict;
==== //depot/perl/ext/IO/lib/IO/Seekable.pm#16 (text) ====
Index: perl/ext/IO/lib/IO/Seekable.pm
--- perl/ext/IO/lib/IO/Seekable.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/ext/IO/lib/IO/Seekable.pm Sun Sep 16 15:00:05 2001
@@ -94,7 +94,7 @@
=cut
-require 5.005_64;
+require 5.6.1;
use Carp;
use strict;
our($VERSION, @EXPORT, @ISA);
==== //depot/perl/ext/Opcode/Opcode.pm#24 (text) ====
Index: perl/ext/Opcode/Opcode.pm
--- perl/ext/Opcode/Opcode.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/ext/Opcode/Opcode.pm Sun Sep 16 15:00:05 2001
@@ -1,6 +1,6 @@
package Opcode;
-require 5.005_64;
+require 5.6.1;
use strict;
==== //depot/perl/lib/AnyDBM_File.pm#10 (text) ====
Index: perl/lib/AnyDBM_File.pm
--- perl/lib/AnyDBM_File.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/AnyDBM_File.pm Sun Sep 16 15:00:05 2001
@@ -1,6 +1,6 @@
package AnyDBM_File;
-use 5.005_64;
+use 5.6.1;
our $VERSION = '1.00';
our @ISA = qw(NDBM_File DB_File GDBM_File SDBM_File ODBM_File) unless @ISA;
==== //depot/perl/lib/AutoSplit.pm#29 (text) ====
Index: perl/lib/AutoSplit.pm
--- perl/lib/AutoSplit.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/AutoSplit.pm Sun Sep 16 15:00:05 2001
@@ -1,6 +1,6 @@
package AutoSplit;
-use 5.005_64;
+use 5.6.1;
use Exporter ();
use Config qw(%Config);
use Carp qw(carp);
==== //depot/perl/lib/Class/Struct.pm#23 (text) ====
Index: perl/lib/Class/Struct.pm
--- perl/lib/Class/Struct.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/Class/Struct.pm Sun Sep 16 15:00:05 2001
@@ -2,7 +2,7 @@
## See POD after __END__
-use 5.005_64;
+use 5.6.1;
use strict;
use warnings::register;
==== //depot/perl/lib/Dumpvalue.pm#12 (text) ====
Index: perl/lib/Dumpvalue.pm
--- perl/lib/Dumpvalue.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/Dumpvalue.pm Sun Sep 16 15:00:05 2001
@@ -1,4 +1,4 @@
-use 5.005_64; # for (defined ref) and $#$v and our
+use 5.6.1; # for (defined ref) and $#$v and our
package Dumpvalue;
use strict;
our $VERSION = '1.00';
==== //depot/perl/lib/ExtUtils/Command.pm#12 (text) ====
Index: perl/lib/ExtUtils/Command.pm
--- perl/lib/ExtUtils/Command.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/ExtUtils/Command.pm Sun Sep 16 15:00:05 2001
@@ -1,6 +1,6 @@
package ExtUtils::Command;
-use 5.005_64;
+use 5.6.1;
use strict;
# use AutoLoader;
use Carp;
==== //depot/perl/lib/ExtUtils/Install.pm#29 (text) ====
Index: perl/lib/ExtUtils/Install.pm
--- perl/lib/ExtUtils/Install.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/ExtUtils/Install.pm Sun Sep 16 15:00:05 2001
@@ -1,6 +1,6 @@
package ExtUtils::Install;
-use 5.005_64;
+use 5.6.1;
our(@ISA, @EXPORT, $VERSION);
$VERSION = substr q$Revision: 1.29 $, 10;
# $Date: 1998/01/25 07:08:24 $
==== //depot/perl/lib/ExtUtils/Installed.pm#10 (text) ====
Index: perl/lib/ExtUtils/Installed.pm
--- perl/lib/ExtUtils/Installed.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/ExtUtils/Installed.pm Sun Sep 16 15:00:05 2001
@@ -1,6 +1,6 @@
package ExtUtils::Installed;
-use 5.005_64;
+use 5.6.1;
use strict;
use Carp qw();
use ExtUtils::Packlist;
==== //depot/perl/lib/ExtUtils/Liblist.pm#30 (text) ====
Index: perl/lib/ExtUtils/Liblist.pm
--- perl/lib/ExtUtils/Liblist.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/ExtUtils/Liblist.pm Sun Sep 16 15:00:05 2001
@@ -21,7 +21,7 @@
# This kid package is to be used by MakeMaker. It will not work if
# $self is not a Makemaker.
-use 5.005_64;
+use 5.6.1;
# Broken out of MakeMaker from version 4.11
our $VERSION = substr q$Revision: 1.27 $, 10;
==== //depot/perl/lib/ExtUtils/Mksymlists.pm#27 (text) ====
Index: perl/lib/ExtUtils/Mksymlists.pm
--- perl/lib/ExtUtils/Mksymlists.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/ExtUtils/Mksymlists.pm Sun Sep 16 15:00:05 2001
@@ -1,6 +1,6 @@
package ExtUtils::Mksymlists;
-use 5.005_64;
+use 5.6.1;
use strict qw[ subs refs ];
# no strict 'vars'; # until filehandles are exempted
==== //depot/perl/lib/ExtUtils/Packlist.pm#7 (text) ====
Index: perl/lib/ExtUtils/Packlist.pm
--- perl/lib/ExtUtils/Packlist.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/ExtUtils/Packlist.pm Sun Sep 16 15:00:05 2001
@@ -1,6 +1,6 @@
package ExtUtils::Packlist;
-use 5.005_64;
+use 5.6.1;
use strict;
use Carp qw();
our $VERSION = '0.04';
==== //depot/perl/lib/Fatal.pm#7 (text) ====
Index: perl/lib/Fatal.pm
--- perl/lib/Fatal.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/Fatal.pm Sun Sep 16 15:00:05 2001
@@ -1,6 +1,6 @@
package Fatal;
-use 5.005_64;
+use 5.6.1;
use Carp;
use strict;
our($AUTOLOAD, $Debug, $VERSION);
==== //depot/perl/lib/FileHandle.pm#13 (text) ====
Index: perl/lib/FileHandle.pm
--- perl/lib/FileHandle.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/FileHandle.pm Sun Sep 16 15:00:05 2001
@@ -1,6 +1,6 @@
package FileHandle;
-use 5.005_64;
+use 5.6.1;
use strict;
our($VERSION, @ISA, @EXPORT, @EXPORT_OK);
==== //depot/perl/lib/Math/Trig.pm#18 (text) ====
Index: perl/lib/Math/Trig.pm
--- perl/lib/Math/Trig.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/Math/Trig.pm Sun Sep 16 15:00:05 2001
@@ -7,7 +7,7 @@
require Exporter;
package Math::Trig;
-use 5.005_64;
+use 5.6.1;
use strict;
use Math::Complex qw(:trig);
==== //depot/perl/lib/Net/Ping.pm#19 (text) ====
Index: perl/lib/Net/Ping.pm
--- perl/lib/Net/Ping.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/Net/Ping.pm Sun Sep 16 15:00:05 2001
@@ -12,7 +12,7 @@
# Copyright (c) 2001, Colin McMillen. All rights reserved. This
# program is free software; you may redistribute it and/or modify it
# under the same terms as Perl itself.
-use 5.005_64;
+use 5.6.1;
require Exporter;
use strict;
==== //depot/perl/lib/Net/hostent.pm#10 (text) ====
Index: perl/lib/Net/hostent.pm
--- perl/lib/Net/hostent.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/Net/hostent.pm Sun Sep 16 15:00:05 2001
@@ -1,7 +1,7 @@
package Net::hostent;
use strict;
-use 5.005_64;
+use 5.6.1;
our $VERSION = '1.00';
our(@EXPORT, @EXPORT_OK, %EXPORT_TAGS);
BEGIN {
==== //depot/perl/lib/Net/netent.pm#10 (text) ====
Index: perl/lib/Net/netent.pm
--- perl/lib/Net/netent.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/Net/netent.pm Sun Sep 16 15:00:05 2001
@@ -1,7 +1,7 @@
package Net::netent;
use strict;
-use 5.005_64;
+use 5.6.1;
our $VERSION = '1.00';
our(@EXPORT, @EXPORT_OK, %EXPORT_TAGS);
BEGIN {
==== //depot/perl/lib/Net/protoent.pm#11 (text) ====
Index: perl/lib/Net/protoent.pm
--- perl/lib/Net/protoent.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/Net/protoent.pm Sun Sep 16 15:00:05 2001
@@ -1,7 +1,7 @@
package Net::protoent;
use strict;
-use 5.005_64;
+use 5.6.1;
our $VERSION = '1.00';
our(@EXPORT, @EXPORT_OK, %EXPORT_TAGS);
BEGIN {
==== //depot/perl/lib/Net/servent.pm#8 (text) ====
Index: perl/lib/Net/servent.pm
--- perl/lib/Net/servent.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/Net/servent.pm Sun Sep 16 15:00:05 2001
@@ -1,7 +1,7 @@
package Net::servent;
use strict;
-use 5.005_64;
+use 5.6.1;
our $VERSION = '1.00';
our(@EXPORT, @EXPORT_OK, %EXPORT_TAGS);
BEGIN {
==== //depot/perl/lib/Shell.pm#13 (text) ====
Index: perl/lib/Shell.pm
--- perl/lib/Shell.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/Shell.pm Sun Sep 16 15:00:05 2001
@@ -1,5 +1,5 @@
package Shell;
-use 5.005_64;
+use 5.6.1;
use strict;
use warnings;
our($capture_stderr, $VERSION, $AUTOLOAD);
==== //depot/perl/lib/Tie/Array.pm#13 (text) ====
Index: perl/lib/Tie/Array.pm
--- perl/lib/Tie/Array.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/Tie/Array.pm Sun Sep 16 15:00:05 2001
@@ -1,6 +1,6 @@
package Tie::Array;
-use 5.005_64;
+use 5.6.1;
use strict;
use Carp;
our $VERSION = '1.02';
==== //depot/perl/lib/Tie/Handle.pm#13 (text) ====
Index: perl/lib/Tie/Handle.pm
--- perl/lib/Tie/Handle.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/Tie/Handle.pm Sun Sep 16 15:00:05 2001
@@ -1,6 +1,6 @@
package Tie::Handle;
-use 5.005_64;
+use 5.6.1;
our $VERSION = '4.1';
=head1 NAME
==== //depot/perl/lib/Time/gmtime.pm#8 (text) ====
Index: perl/lib/Time/gmtime.pm
--- perl/lib/Time/gmtime.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/Time/gmtime.pm Sun Sep 16 15:00:05 2001
@@ -2,7 +2,7 @@
use strict;
use Time::tm;
-use 5.005_64;
+use 5.6.1;
our(@ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS, $VERSION);
BEGIN {
use Exporter ();
==== //depot/perl/lib/Time/localtime.pm#8 (text) ====
Index: perl/lib/Time/localtime.pm
--- perl/lib/Time/localtime.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/Time/localtime.pm Sun Sep 16 15:00:05 2001
@@ -2,7 +2,7 @@
use strict;
use Time::tm;
-use 5.005_64;
+use 5.6.1;
our(@ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS, $VERSION);
BEGIN {
use Exporter ();
==== //depot/perl/lib/User/grent.pm#9 (text) ====
Index: perl/lib/User/grent.pm
--- perl/lib/User/grent.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/User/grent.pm Sun Sep 16 15:00:05 2001
@@ -1,7 +1,7 @@
package User::grent;
use strict;
-use 5.005_64;
+use 5.6.1;
our $VERSION = '1.00';
our(@EXPORT, @EXPORT_OK, %EXPORT_TAGS);
BEGIN {
==== //depot/perl/lib/base.pm#15 (text) ====
Index: perl/lib/base.pm
--- perl/lib/base.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/base.pm Sun Sep 16 15:00:05 2001
@@ -44,7 +44,7 @@
package base;
-use 5.005_64;
+use 5.6.1;
our $VERSION = "1.02";
sub import {
==== //depot/perl/lib/fields.pm#18 (text) ====
Index: perl/lib/fields.pm
--- perl/lib/fields.pm.~1~ Sun Sep 16 15:00:05 2001
+++ perl/lib/fields.pm Sun Sep 16 15:00:05 2001
@@ -127,7 +127,7 @@
=cut
-use 5.005_64;
+use 5.6.1;
use strict;
no strict 'refs';
use warnings::register;
End of Patch.