Fixed both analyze.sh and top50.pl scripts.

[pgp-tools.git] / keyanalyze / scripts / top50.pl

diff --git a/keyanalyze/scripts/top50.pl b/keyanalyze/scripts/top50.pl
index 5a30de65b00e93539f1397e824dbb0ef1138d7b7..da51ebfeaca338bffe9876e043a9bd1f60c28723 100755 (executable)
--- a/keyanalyze/scripts/top50.pl
+++ b/keyanalyze/scripts/top50.pl
@@ -34,7 +34,7 @@ if (open F, $comments) {
 
 my %msd;
 while (my $line = <>) {
-       $line =~ /^\w+\s+(\w+)\s+([\d\.]+)/ or die "cannot parse line $.: $_";
+       $line =~ /^\w+\s+(\w+)\s+([\d\.]+)/ or die "cannot parse line $.: $line";
        $msd{$1} = $2;
 }