X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?p=spider.git;a=blobdiff_plain;f=cmd%2Fdx.pl;h=a966ff6b01ccd56c304ea6c24e5e5df0385bd72a;hp=cbf003c0d825cd5762ca3755625fe397af4aad34;hb=171a7a0bf86e9732a33c7829e808129ec01c51c2;hpb=0824a94355e5fb2b4c379bb013d66466725629f5 diff --git a/cmd/dx.pl b/cmd/dx.pl index cbf003c0..a966ff6b 100644 --- a/cmd/dx.pl +++ b/cmd/dx.pl @@ -19,11 +19,11 @@ my @out; if ($f[0] =~ /[A-Za-z]/) { $spotter = uc $f[0]; $freq = $f[1]; - $spotted = $f[2]; - $line =~ s/^$f[0]\s+$freq\s+$spotted\s*//; + $spotted = uc $f[2]; + $line =~ s/^$f[0]\s+$f[1]\s+$f[2]\s*//; } else { $freq = $f[0]; - $spotted = $f[1]; + $spotted = uc $f[1]; $line =~ s/^$f[0]\s+$f[1]\s*//; }