File::Slurp offers a shortcut for the opendir/readdir/closedir idiom:

use File::Slurp;

my $dir = '.';      # or whatever

my @files = sort grep { -f "$dir/$_" } read_dir($dir);
[download]

Note that File::Slurp::read_dir automatically skips '.' and '..'.