in reply to How do you list all files under a directory?

Use File::Glob::bsd_glob:

use File::Glob qw(bsd_glob);
my @files = bsd_glob "$dir/*";

[download]

In Section Seekers of Perl Wisdom