You can also use File::stat

use File::stat;
my $prettyFileTime = localtime( stat("$dir/$file")->mtime);
[download]