Beginning with Perl v5.6.0, you can use the standard File::Glob extension : see http://perldoc.perl.org/File/Glob.html

use File::Glob ':globally';</br>
my $dir = '/my/dir';
my @files = <$dir/*>;
print "$_\n" for @files;
[download]

Hope This Helps