Hello. This is just FYI... I've just figured out why the libwww-perl tests passed last week but not today: we've just transitioned here into daylight saving (GMT -> BST)
The failing test is in t/base/date.t, below. It uses a reference date three
days in the past. By converting it using localtime() this test is sensitive
to daylight saving. So this test will fail today, but not tomorrow!
Regards,
Steve James
===
# test the 'ls -l' format with missing year$
# round to nearest minute 3 days ago.
$time = int((time - 3 * 24*60*60) /60)*60;
($min, $hr, $mday, $mon) = (localtime $time)[1,2,3,4];
$mon = (qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec))[$mon];
$str = sprintf("$mon %02d %02d:%02d", $mday, $hr, $min);
$t = str2time($str);
$t = "UNDEF" unless defined $t;
print "'$str' => $t ($time)\n";
print "not " if $t != $time;
ok;
--
You're a card which will have to be dealt with.
pgpS0fODPOI3o.pgp
Description: PGP signature
