for my $file (sort {$a->{filename} cmp $b->{filename}} @files) {
 ...
}