--- libnet-1.0505.orig/Makefile.PL Wed May 28 01:48:36 1997 +++ libnet-1.0505/Makefile.PL Mon Oct 13 08:43:38 1997 @@ -5,7 +5,7 @@ $NAME = 'Net'; $DISTNAME = "libnet"; -$VERSION = "1.0505"; +$VERSION = "1.0506"; BEGIN { require 5.002 } --- libnet-1.0505.orig/Configure Thu Apr 3 09:16:13 1997 +++ libnet-1.0505/Configure Mon Oct 13 08:42:12 1997 @@ -499,22 +499,22 @@ require File::Copy; my $mod = $INC{'Net/Config.pm'} or - Carp::croak "Can't find myself"; + Carp::croak("Can't find myself"); my $bak = $mod . "~"; print "Updating $mod...\n"; File::Copy::copy($mod,$bak) or - Carp::croak "Cannot create backup file $bak: $!"; + Carp::croak("Cannot create backup file $bak: $!"); print "...backup at $bak\n"; - my $old = new IO::File $bak,"r" or - Carp::croak "Can't open $bak: $!"; + my $old = new IO::File($bak,"r") or + Carp::croak("Can't open $bak: $!"); - my $new = new IO::File $mod,"w" or - Carp::croak "Can't open $mod: $!"; + my $new = new IO::File($mod,"w") or + Carp::croak("Can't open $mod: $!"); # If we fail below, then we must restore from backup local $SIG{'__DIE__'} = sub {