perl打印文件最后修改时间

时间:2012-09-11 19:31:33

标签: perl

我使用以下方法打印文件上次修改时间,但结果是脚本上打印的时间比文件标记向后2小时。

use File::stat;
use Time::localtime;

$file = '/opt/test/time';
$date = ctime(stat($file)->mtime);
print "<b> $date </b>";

文件名“test”的时间戳是下午12:30,但脚本时间显示为上午10:30。

我错过了什么吗?

0 个答案:

没有答案