Randy W. Sims [Mon, 20 Mar 2006 06:37:31 +0000 (01:37 -0500)]
From: "Randy W. Sims" <ml-perl@thepierianspring.org>
Message-ID: <
441E93FB.3050906@thepierianspring.org>
p4raw-id: //depot/perl@27571
$DEBUG = 0;
$WARN = 1;
$FOLLOW_SYMLINK = 0;
-$VERSION = "1.29_01";
+$VERSION = "1.29_02";
$CHOWN = 1;
$CHMOD = 1;
$DO_NOT_USE_PREFIX = 0;
}
### throw away trailing garbage ###
- substr ($$data, $entry->size) = "";
+ substr ($$data, $entry->size) = "" if defined $$data;
### part II of the @LongLink munging -- need to do /after/
### the checksum check.