CPAN Use of uninitialized value in newest perl

[p5sagit/p5-mst-13.2.git] / lib / CPAN.pm

diff --git a/lib/CPAN.pm b/lib/CPAN.pm
index e3bb84b..8271076 100644 (file)
--- a/lib/CPAN.pm
+++ b/lib/CPAN.pm
@@ -2039,6 +2039,7 @@ sub rd_modpacks {
     while (<$fh>) {
        chomp;
        my($mod,$version,$dist) = split;
+$dist = '' unless defined $dist;
 ###    $version =~ s/^\+//;
 
        # if it as a bundle, instatiate a bundle object