my @files = sort grep { -f catfile($configfile, $_) } catfile($configfile, $_), readdir INCLUDEDIR;

##</code><code>##

my @files = sort grep { -f catfile($configfile, $_) } readdir INCLUDEDIR;