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

##</code><code>##

opendir (LOWEST, "<$input_directory_lowest")