readdir doesn't put the directory name on what it returns, so when you call stat you're not getting any results (and hence $mtime is undef and localtime will return the epoch). You need to do stat( "$dir/$file" ) instead, or change your working directory to $dir.