use File::stat; # don't worry, it's part of standard perl

##</code><code>##

@allPictures =
 sort {stat($a)->mtime <=> stat($b)->mtime} @allPictures;