Help for this page

Select Code to Download


  1. or download this
    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";
    
  2. or download this
    use POSIX qw(strftime);