Select Code to Download

use strict;
use warnings;
use utf8;
...
  my $when = localtime $mtime;
  print "$when: $file\n";
}

...
Thu Apr 30 10:24:40 2015: ./alpaca/template_stuff/html1.pm
...
Thu May 21 09:22:21 2015: ./perl5/lib/perl5/HTML/TableExtract.pm
Mon Nov  1 07:04:16 2010: ./perl5/lib/perl5/Prompt/Timeout.pm
Wed Jun 24 04:07:26 2009: ./perl5/lib/perl5/WWW/Mechanize/GZip.pm

use strict;
use warnings;
use utf8;
...
  my $when = localtime $atime;
  print "$when: $file\n";
}

local time is 13 44 19 23 5 116 4 174 1

Mon Jun 13 19:12:19 2016: ./alpaca/template_stuff/html1.pm
...
Wed Jun 22 22:08:24 2016: ./perl5/lib/perl5/HTML/TableExtract.pm
Wed Jun 22 22:12:21 2016: ./perl5/lib/perl5/Prompt/Timeout.pm
Wed Jun 22 22:06:40 2016: ./perl5/lib/perl5/WWW/Mechanize/GZip.pm