DateTime では time_zone 指定をする
DateTime を使って時刻を表示させている時間がどうもずれていると思ったら time_zone の指定が必要そう。
my $dt = DateTime->now( time_zone => 'Asia/Tokyo' ); or my $dt = DateTime->now( time_zone => 'local' );
デフォルトで指定が必要ってのも面倒だなぁ。
簡単なロギング目的だったら POSIX の strftime のほうが良かろうか。
use POSIX; print strftime("%Y-%m-%d %H:%M:%S", localtime);
てな。