* Time::Piece [#n54937d4]
** Time::PieceとTime::Seconds [#fb84926b]
:Time::Piece|日付・時刻（タイムスタンプ）を表す。
:Time::Seconds|時間（秒）を表す。
** Time::Pieceオブジェクトを作る [#l7ad822a]
*** ローカルタイム [#qbf2b389]
my $now = Time::Piece->localtime(); # 現在時刻
my $epoch = Time::Piece->localtime(0); # 1970-01-01 09:00:00 タイムゾーンが日本の場合
*** 世界標準時 [#k54b6f5d]
my $now = Time::Piece->gmtime(); # タイムゾーンが日本の場合、localtime()より9時間前
my $epoch = Time::Piece->gmtime(0); # 1970-01-01 00:00:00
*** 日時フォーマット指定 [#rd36d01d]
my $tp = Time::Piece->strptime('1960-04-01 00:00:00', '%Y-%m-%d %H:%M:%S');
** Time::Seconds [#ufd881e7]
*** Time::PieceオブジェクトをTime::Secondsオブジェクトへ変換する [#p48e99c6]
my $ts = Time::Seconds->new($tp->epoch);
*** Time::SecondsオブジェクトをTime::Pieceオブジェクトへ変換する [#fbf7db03]
my $tp2 = Time::Piece->gmtime($ts->seconds);
