Just a thought -- could this be a result of using File::stat? When you use it, it overrides the built-in stat to return a File::stat object that you access like this:

my $fs = stat($file);
my $mtime = $fs->mtime();
[download]