This should work and give you human time - Its untested, but Ive used similar code in the past. I have tested it on a w2k box and it does indeed work.

my $file="MY FILE";
my $create_seconds = ( stat($file) )[10];
$create_seconds = $create_seconds - 86400;
my $creation = ( ! defined ($create_seconds) ) 
   ? "null" 
   :POSIX::strftime( "%B %d", $modtime_seconds, 0, 0, 0, 0, 0, 0, 0, 0
+ );
print "File: $file   Created: $creation\n";
[download]

UPDATE
dont forget to use:

use POSIX qw(strftime);
[download]

before using the above code.