From: minima Date: Mon, 27 Nov 2000 09:24:22 +0000 (+0000) Subject: a bit more X-Git-Tag: R_1_45~18 X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=commitdiff_plain;h=f27dfe9a147f72b0d1e95ca4d3d99321460f18a5;p=spider.git a bit more --- diff --git a/perl/WCY.pm b/perl/WCY.pm index 06f41d2d..3949e5e4 100644 --- a/perl/WCY.pm +++ b/perl/WCY.pm @@ -195,7 +195,7 @@ sub print_item my $d = cldate($r->[0]); my $t = (gmtime($r->[0]))[2]; - return sprintf("$d %02d %5d %3d %3d %3d %3d %-5s %-5s %6s <%s>", + return sprintf("$d %02d %5d %3d %3d %3d %3d %-5s %-5s %6s <%s>", $t, @$r[1..9]); }