| Subject: | Files should be processed in alphabetical order... |
When processing multiple files, the log messages make more sense when they are presented in an order. As it is, files are processed in random order.
The line in the first pass
foreach my $infile (keys %PODS) {
should become
foreach my $infile (sort keys %PODS) {