奇怪的是,这似乎适用于今年和其他近年来,但如果我尝试回到2000年,例如,Perl似乎认为过渡发生在错误的一天！

根据谷歌的说法,夏令时于2000年4月2日开始：

…但由于某种原因,下面的Perl代码似乎不同意：

use POSIX qw(strftime);
use Time::Local;

# 03/12/2000 01:59:59
($year,$month,$day,$hour,$minute,$second) = (2000,3,12,1,59,59);
$epoch = timelocal($second,$month - 1,$year);

# Print the time
print strftime "%m/%d/%Y %H:%M:%S - %Z\n",localtime($epoch);

# 03/12/2000 02:00:00
($year,2,0);
$epoch = timelocal($second,localtime($epoch);

输出：

03/12/2000 01:59:59 - Eastern Standard Time
03/12/2000 03:00:00 - Eastern Daylight Time

为什么Perl认为2000年的夏令时开始于3月12日,那显然这是不正确的？

编辑：

阅读下面的评论后,看起来这可能是操作系统的问题,而不是Perl.看起来这可能是Windows 7中的一个错误.