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