note clueless newbie <p>Why not use File::Find::find's <a href=http://search.cpan.org/~dom/perl-5.12.5/lib/File/Find.pm#%options>preprocess option</a>? Something along the lines of </p> <code> File::Find::find({preprocess=>sub { return sort {uc $a cmp uc $b} @_ }, wanted=>sub { return if (-d); say $_; } },@ARGV); </code> 1019048 1019048