Select Code to Download

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

use POSIX qw(strftime);