# alphanumerisch
my @files = sort readdir DIR;

# nach änderungsdatum, neuestes zuletzt
my @files = sort {-M "$directory/$b" <=> -M "$directory/$a" } readdir DIR;