my @EnvListFile=glob("$HOMEDIR/data/EnvList.*"); 

##</code><code>##

open DIR, "$HOMEDIR/data/EnvList" or die $!;
my @EnvListFile = grep{ -f "$HOMEDIR/data/EnvList/$_"
                         and
                        /\d+$/ } readdir DIR; #perhaps???