use strict;
use warnings;
use utf8;
use 5.014;
use File::Find;

my @directories_to_search = ('.', 'C:\Users\Fred\Desktop');
my @files;
find( \&find_module, @directories_to_search );

sub find_module {
   if ( $_ =~ m/.pm$/ ) {
      my $name = $File::Find::name;
      push( @files, $name );
   }
}

for my $file (@files) {
  my $mtime = (stat $file)[9];        # mtime via slice
  my $when = localtime $mtime;
  print "$when: $file\n";
}

##</code><code>##

...
Thu Apr 30 10:24:40 2015: ./alpaca/template_stuff/html1.pm
Sun Jun  5 14:32:45 2016: ./alpaca/template_stuff/html2.pm
Sun Jun  5 14:08:18 2016: ./alpaca/template_stuff/html3.pm
Thu Apr 30 10:24:40 2015: ./alpaca/template_stuff/utils1.pm
Wed Jun  9 08:59:19 2010: ./perl5/lib/perl5/HTML/ElementGlob.pm
Wed Jun  9 08:24:01 2010: ./perl5/lib/perl5/HTML/ElementRaw.pm
Wed Jun  9 13:56:58 2010: ./perl5/lib/perl5/HTML/ElementSuper.pm
Wed Jun  9 16:17:31 2010: ./perl5/lib/perl5/HTML/ElementTable.pm
Thu Feb 15 07:35:15 2007: ./perl5/lib/perl5/HTML/Extract.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

##</code><code>##

use strict;
use warnings;
use utf8;
use 5.014;
use File::Find;

my @directories_to_search = ('.', 'C:\Users\Fred\Desktop');
my @files;
find( \&find_module, @directories_to_search );
my @time =localtime;
say "local time is @time";

sub find_module {
   if ( $_ =~ m/.pm$/ ) {
      my $name = $File::Find::name;
      push( @files, $name );
   }
}

for my $file (@files) {
  my $atime = (stat $file)[8];        # atime via slice
  my $when = localtime $atime;
  print "$when: $file\n";
}

##</code><code>##

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

Mon Jun 13 19:12:19 2016: ./alpaca/template_stuff/html1.pm
Mon Jun 13 19:12:19 2016: ./alpaca/template_stuff/html2.pm
Mon Jun 13 19:12:19 2016: ./alpaca/template_stuff/html3.pm
Mon Jun 13 19:12:19 2016: ./alpaca/template_stuff/utils1.pm
...
Wed Jun 22 22:09:13 2016: ./perl5/lib/perl5/HTML/ElementGlob.pm
Wed Jun 22 22:09:13 2016: ./perl5/lib/perl5/HTML/ElementRaw.pm
Wed Jun 22 22:09:13 2016: ./perl5/lib/perl5/HTML/ElementSuper.pm
Wed Jun 22 22:09:13 2016: ./perl5/lib/perl5/HTML/ElementTable.pm
Wed Jun 22 22:07:17 2016: ./perl5/lib/perl5/HTML/Extract.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