use Time::Piece; my $time = localtime; print $time->date . " " . $time->time . "\n"; $time += 3600; # 1時間後 print $time->date . " " . $time->time . "\n"; Time::Pieceは、localtime関数とgmtime関数を、それぞれスカラコンテキストではTime::Pieceオブジェクトを返すものに変更(overload)します。ただし、リストコンテキストではTime::Pieceモジュール読込後も、通常通り秒、分、時、日、月、...の配列を返します。 通常(Time::Pieceモジュールを読み込んでいない時)は、次のようにlocaltime関数を呼ぶと $_には"Thu Nov 1 01:46:31 2007"のような文字列が入ります。