#### Need to keep this code unchanged
opendir DIR, 'Whatever/path' or die "Cannot open 'Whatever/path' $!";
my @files = map "Whatever/path/$_" grep !/\A\.\.?\z/, readdir DIR;
closedir DIR;