X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?p=spider.git;a=blobdiff_plain;f=perl%2FSpot.pm;h=7fb1c2275a6fbceb24e89610e3d85eb7e0ac6b95;hp=e53880e1d48f6db0070a35d7482b03821809ff24;hb=b060a0a3ee72530aa3f10d453186a662b66d7efe;hpb=3d29b1a4d4aab997da2deff10470068601744530 diff --git a/perl/Spot.pm b/perl/Spot.pm index e53880e1..7fb1c227 100644 --- a/perl/Spot.pm +++ b/perl/Spot.pm @@ -172,6 +172,7 @@ sub formatl my $t = ztime($dx[2]); my $d = cldate($dx[2]); return sprintf "%8.1f %-11s %s %s %-28.28s%7s>", $dx[0], $dx[1], $d, $t, $dx[3], "<$dx[4]" ; -} +} + 1;