X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FSpot.pm;h=b4fd27c4c1f5c69c757120742f61fecc62b5b568;hb=1e126f735c36856358bf5d698c8944f5ab9ea804;hp=92f705523a364652c2320ef37814ef9548f42905;hpb=b80b21be59cd48ebdee1ceeddd739114d6e9ab08;p=spider.git diff --git a/perl/Spot.pm b/perl/Spot.pm index 92f70552..b4fd27c4 100644 --- a/perl/Spot.pm +++ b/perl/Spot.pm @@ -169,13 +169,13 @@ sub prepare my @out = @_[0..4]; # just up to the spotter # normalise frequency - $_[0] = sprintf "%.1f", $_[0]; + $out[0] = sprintf "%.1f", $out[0]+0.05; # remove ssids and /xxx if present on spotter $out[4] =~ s/-\d+$//o; # remove leading and trailing spaces - $_[3] = unpad($_[3]); + $out[3] = unpad($out[3]); # add the 'dxcc' country on the end for both spotted and spotter, then the cluster call