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