statで情報を取得することができます。その中にタイムスタンプの情報が入っています。 use strict; use warnings; my $filename = 'hoge.txt'; my @filestat = stat $filename; my $atime = localtime($filestat[8]); # アクセス日 my $mtime = localtime($filestat[9]); # 更新時刻 print $atime, "\n"; print $mtime, "\n"; 関連項目 ・localtime関数 ・stat関数 ・utime関数 ・ファイルテスト演算子