Re: script wanted

Message-ID: <20030813204609.G20130@plum.flirble.org>

p4raw-id: //depot/perl@20686

diff --git a/ext/B/B.pm b/ext/B/B.pm
index 85b88fc..c251459 100644 (file)
--- a/ext/B/B.pm
+++ b/ext/B/B.pm
@@ -7,7 +7,7 @@
 #
 package B;
 
-our $VERSION = '1.01';
+our $VERSION = '1.02';
 
 use XSLoader ();
 require Exporter;

diff --git a/ext/B/B/Bblock.pm b/ext/B/B/Bblock.pm
index 35a80ea..908cc76 100644 (file)
--- a/ext/B/B/Bblock.pm
+++ b/ext/B/B/Bblock.pm
@@ -1,6 +1,6 @@
 package B::Bblock;
 
-our $VERSION = '1.00';
+our $VERSION = '1.02';
 
 use Exporter ();
 @ISA = "Exporter";

diff --git a/ext/B/B/C.pm b/ext/B/B/C.pm
index 9ae2359..3011eb0 100644 (file)
--- a/ext/B/B/C.pm
+++ b/ext/B/B/C.pm
@@ -7,7 +7,7 @@
 #
 package B::C::Section;
 
-our $VERSION = '1.01';
+our $VERSION = '1.02';
 
 use B ();
 use base B::Section;

diff --git a/ext/B/B/Debug.pm b/ext/B/B/Debug.pm
index 38cfc67..92b91d2 100644 (file)
--- a/ext/B/B/Debug.pm
+++ b/ext/B/B/Debug.pm
@@ -1,6 +1,6 @@
 package B::Debug;
 
-our $VERSION = '1.00';
+our $VERSION = '1.01';
 
 use strict;
 use B qw(peekop class walkoptree walkoptree_exec

diff --git a/ext/B/B/Lint.pm b/ext/B/B/Lint.pm
index af82a1a..1c08e8e 100644 (file)
--- a/ext/B/B/Lint.pm
+++ b/ext/B/B/Lint.pm
@@ -1,6 +1,6 @@
 package B::Lint;
 
-our $VERSION = '1.01';
+our $VERSION = '1.02';
 
 =head1 NAME
 

diff --git a/ext/Fcntl/Fcntl.pm b/ext/Fcntl/Fcntl.pm
index 5153ad5..9cdeb13 100644 (file)
--- a/ext/Fcntl/Fcntl.pm
+++ b/ext/Fcntl/Fcntl.pm
@@ -60,7 +60,7 @@ our($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS, $AUTOLOAD);
 require Exporter;
 use XSLoader ();
 @ISA = qw(Exporter);
-$VERSION = "1.04";
+$VERSION = "1.05";
 # Items to export into callers namespace by default
 # (move infrequently used names to @EXPORT_OK below)
 @EXPORT =

diff --git a/ext/File/Glob/Glob.pm b/ext/File/Glob/Glob.pm
index d670b6a..2aa3a1d 100644 (file)
--- a/ext/File/Glob/Glob.pm
+++ b/ext/File/Glob/Glob.pm
@@ -56,7 +56,7 @@ use XSLoader ();
     ) ],
 );
 
-$VERSION = '1.01';
+$VERSION = '1.02';
 
 sub import {
     require Exporter;

diff --git a/ext/IO/IO.pm b/ext/IO/IO.pm
index 70017cb..2a368e7 100644 (file)
--- a/ext/IO/IO.pm
+++ b/ext/IO/IO.pm
@@ -7,7 +7,7 @@ use Carp;
 use strict;
 use warnings;
 
-our $VERSION = "1.20";
+our $VERSION = "1.21";
 XSLoader::load 'IO', $VERSION;
 
 sub import {

diff --git a/ext/IO/lib/IO/File.pm b/ext/IO/lib/IO/File.pm
index c90eb37..538efcd 100644 (file)
--- a/ext/IO/lib/IO/File.pm
+++ b/ext/IO/lib/IO/File.pm
@@ -121,7 +121,7 @@ require Exporter;
 
 @ISA = qw(IO::Handle IO::Seekable Exporter);
 
-$VERSION = "1.09";
+$VERSION = "1.10";
 
 @EXPORT = @IO::Seekable::EXPORT;
 

diff --git a/ext/IO/lib/IO/Handle.pm b/ext/IO/lib/IO/Handle.pm
index 29b8316..465ea6c 100644 (file)
--- a/ext/IO/lib/IO/Handle.pm
+++ b/ext/IO/lib/IO/Handle.pm
@@ -263,7 +263,7 @@ use IO ();  # Load the XS module
 require Exporter;
 @ISA = qw(Exporter);
 
-$VERSION = "1.21_00";
+$VERSION = "1.22_00";
 $VERSION = eval $VERSION;
 
 @EXPORT_OK = qw(

diff --git a/ext/IO/lib/IO/Select.pm b/ext/IO/lib/IO/Select.pm
index 83c3d4a..3e23cc0 100644 (file)
--- a/ext/IO/lib/IO/Select.pm
+++ b/ext/IO/lib/IO/Select.pm
@@ -11,7 +11,7 @@ use warnings::register;
 use     vars qw($VERSION @ISA);
 require Exporter;
 
-$VERSION = "1.15";
+$VERSION = "1.16";
 
 @ISA = qw(Exporter); # This is only so we can do version checking
 

diff --git a/ext/IO/lib/IO/Socket.pm b/ext/IO/lib/IO/Socket.pm
index f8c3cb3..e706894 100644 (file)
--- a/ext/IO/lib/IO/Socket.pm
+++ b/ext/IO/lib/IO/Socket.pm
@@ -23,7 +23,7 @@ require IO::Socket::UNIX if ($^O ne 'epoc');
 
 @ISA = qw(IO::Handle);
 
-$VERSION = "1.27";
+$VERSION = "1.28";
 
 @EXPORT_OK = qw(sockatmark);
 

diff --git a/ext/IO/lib/IO/Socket/INET.pm b/ext/IO/lib/IO/Socket/INET.pm
index 7d1c94d..ce3435f 100644 (file)
--- a/ext/IO/lib/IO/Socket/INET.pm
+++ b/ext/IO/lib/IO/Socket/INET.pm
@@ -15,7 +15,7 @@ use Exporter;
 use Errno;
 
 @ISA = qw(IO::Socket);
-$VERSION = "1.26";
+$VERSION = "1.27";
 
 my $EINVAL = exists(&Errno::EINVAL) ? Errno::EINVAL() : 1;
 

diff --git a/ext/IPC/SysV/Msg.pm b/ext/IPC/SysV/Msg.pm
index 50ca564..88d7b34 100644 (file)
--- a/ext/IPC/SysV/Msg.pm
+++ b/ext/IPC/SysV/Msg.pm
@@ -11,7 +11,7 @@ use strict;
 use vars qw($VERSION);
 use Carp;
 
-$VERSION = "1.00_00";
+$VERSION = "1.01_00";
 $VERSION = eval $VERSION;
 
 {

diff --git a/ext/IPC/SysV/Semaphore.pm b/ext/IPC/SysV/Semaphore.pm
index 5816f9c..b17664f 100644 (file)
--- a/ext/IPC/SysV/Semaphore.pm
+++ b/ext/IPC/SysV/Semaphore.pm
@@ -12,7 +12,7 @@ use strict;
 use vars qw($VERSION);
 use Carp;
 
-$VERSION = "1.00_00";
+$VERSION = "1.01_00";
 $VERSION = eval $VERSION;
 
 {

diff --git a/ext/POSIX/POSIX.pm b/ext/POSIX/POSIX.pm
index edd3609..819fe57 100644 (file)
--- a/ext/POSIX/POSIX.pm
+++ b/ext/POSIX/POSIX.pm
@@ -2,7 +2,7 @@ package POSIX;
 
 our(@ISA, %EXPORT_TAGS, @EXPORT_OK, $AUTOLOAD) = ();
 
-our $VERSION = "1.05" ;
+our $VERSION = "1.06" ;
 
 use AutoLoader;
 

diff --git a/ext/Sys/Hostname/Hostname.pm b/ext/Sys/Hostname/Hostname.pm
index 632ea9b..415f951 100644 (file)
--- a/ext/Sys/Hostname/Hostname.pm
+++ b/ext/Sys/Hostname/Hostname.pm
@@ -15,7 +15,7 @@ our $VERSION;
 our $host;
 
 BEGIN {
-    $VERSION = '1.1';
+    $VERSION = '1.11';
     {
        local $SIG{__DIE__};
        eval {

diff --git a/ext/Sys/Syslog/Syslog.pm b/ext/Sys/Syslog/Syslog.pm
index 1aec33f..03adde6 100644 (file)
--- a/ext/Sys/Syslog/Syslog.pm
+++ b/ext/Sys/Syslog/Syslog.pm
@@ -7,7 +7,7 @@ use Carp;
 @ISA = qw(Exporter DynaLoader);
 @EXPORT = qw(openlog closelog setlogmask syslog);
 @EXPORT_OK = qw(setlogsock);
-$VERSION = '0.03';
+$VERSION = '0.04';
 
 # it would be nice to try stream/unix first, since that will be
 # most efficient. However streams are dodgy - see _syslog_send_stream

diff --git a/ext/re/re.pm b/ext/re/re.pm
index 6720a7b..bf26fd2 100644 (file)
--- a/ext/re/re.pm
+++ b/ext/re/re.pm
@@ -1,6 +1,6 @@
 package re;
 
-our $VERSION = 0.03;
+our $VERSION = 0.04;
 
 =head1 NAME
 

diff --git a/ext/threads/shared/shared.pm b/ext/threads/shared/shared.pm
index 64ab079..9c573ba 100644 (file)
--- a/ext/threads/shared/shared.pm
+++ b/ext/threads/shared/shared.pm
@@ -7,7 +7,7 @@ BEGIN {
     require Exporter;
     our @ISA = qw(Exporter);
     our @EXPORT = qw(share cond_wait cond_broadcast cond_signal);
-    our $VERSION = '0.90';
+    our $VERSION = '0.91';
 
     if ($threads::threads) {
        *cond_wait = \&cond_wait_enabled;

diff --git a/ext/threads/threads.pm b/ext/threads/threads.pm
index 66c6134..6709f63 100755 (executable)
--- a/ext/threads/threads.pm
+++ b/ext/threads/threads.pm
@@ -52,7 +52,7 @@ our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
 our @EXPORT = qw(
 async  
 );
-our $VERSION = '0.99';
+our $VERSION = '1.00';
 
 
 sub equal {