@files_sorted = sort { $a <=> $b } @files;