cygwin-perlでlocaltimeがGMT

localtime 実行前に、
----
use POSIX 'tzset';
tzset();
----
を行っておく。

※ Perl 5.8.1 のバグ
5.8.2 にアップデートすればよい