Re^2: using File::Find for reading files in order

[grinder]

Either that, or if there are many files that will be skipped by the regexp, sort the results just before returning them.

   return sort {$a <=> $b} @messages;