]> dxcluster.org Git - spider.git/commitdiff
tried to make the date parsing more robust
authordjk <djk>
Sat, 30 Jan 1999 19:59:18 +0000 (19:59 +0000)
committerdjk <djk>
Sat, 30 Jan 1999 19:59:18 +0000 (19:59 +0000)
PC16 can come in without a call

perl/DXProt.pm

index b0d21db377ee62d8d7c847cfbc1dd4d1b4c0debc..ff891427079e0da82419badd01176534a9be815e 100644 (file)
@@ -271,7 +271,7 @@ sub normal
                        
                        for ($i = 2; $i < $#field; $i++) {
                                my ($call, $confmode, $here) = $field[$i] =~ /^(\S+) (\S) (\d)/o;
-                               next if length $call < 3 || length $call > 8;
+                               next if !$call || length $call < 3 || length $call > 8;
                                next if !$confmode;
                                $call = uc $call;
                                next if DXCluster->get_exact($call); # we already have this (loop?)