ファイルを作って時刻を更新する
if(open(my $tmpfh, ">>", '/tmp/hoge.text')){ close($tmpfh); } utime(undef, undef, "/tmp/hoge.text");
ファイルを作成する - Perl入門ゼミ
perl で touch | 裏表(Phinloda のもう裏だか表だか分からないページ)
Perlの組み込み関数 utime の翻訳 - perldoc.jp
このコードはファイルが 既に存在して いて、ユーザーが 実行しているプログラムに従っているなら、 Unix の touch(1) コマンドと同じ効果があります。
Perlの組み込み関数 utime の翻訳 - perldoc.jp