Select Code to Download

use strict;
use File::Find;
...
for (sort { your sort criteria here} @files) {
   say $_;
}

my @files = File::Find::Rule->files()->in($dir);