$ ls -al pm_1079278_mtime_test
total 0
drwxr-xr-x    5 ken  staff    170 22 Mar 04:21 .
drwxr-xr-x  584 ken  staff  19856 22 Mar 04:22 ..
-rw-r--r--    1 ken  staff      0 22 Mar 04:19 test1
-rw-r--r--    1 ken  staff      0 22 Mar 04:20 test2
-rw-r--r--    1 ken  staff      0 22 Mar 04:21 test3

##</code><code>##

#!/usr/bin/env perl -l

use strict;
use warnings;
use autodie;

my $path = './pm_1079278_mtime_test';

opendir(my $dh, $path);
my @files = map { "$path/$_" } readdir $dh;
closedir $dh;

my @sorted_files = sort { -M $a <=> -M $b } @files;

for (@sorted_files) {
    print '-' x 30;
    print "File:  $_";
    next unless -f;
    print '-M:    ', -M;
    print 'stat9: ', (stat)[9];
}

##</code><code>##

------------------------------
File:  ./pm_1079278_mtime_test/..
------------------------------
File:  ./pm_1079278_mtime_test/.
------------------------------
File:  ./pm_1079278_mtime_test/test3
-M:    0.0440856481481482
stat9: 1395422472
------------------------------
File:  ./pm_1079278_mtime_test/test2
-M:    0.0447916666666667
stat9: 1395422411
------------------------------
File:  ./pm_1079278_mtime_test/test1
-M:    0.0450810185185185
stat9: 1395422386

##</code><code>##

#!/usr/bin/env perl -l

use strict;
use warnings;
use autodie;

use File::stat;

my $path = './pm_1079278_mtime_test';

opendir(my $dh, $path);
my @files = map { "$path/$_" } readdir $dh;
closedir $dh;

my @sorted_files = sort { -M $a <=> -M $b } @files;

for (@sorted_files) {
    print '-' x 30;
    print "File:  $_";
    next unless -f;
    print '-M:    ', -M;
    print 'mtime: ', stat($_)->mtime;
}

##</code><code>##

------------------------------
File:  ./pm_1079278_mtime_test/..
------------------------------
File:  ./pm_1079278_mtime_test/.
------------------------------
File:  ./pm_1079278_mtime_test/test3
-M:    0.044849537037037
mtime: 1395422472
------------------------------
File:  ./pm_1079278_mtime_test/test2
-M:    0.0455555555555556
mtime: 1395422411
------------------------------
File:  ./pm_1079278_mtime_test/test1
-M:    0.0458449074074074
mtime: 1395422386