> ls -1
abc.txt
def.txt
xyz.boo
> perl -e '($y)=glob("*.txt");print $y,"\n";'
abc.txt
> perl -e '($y)=glob("boo.txt");print $y,"\n";'
boo.txt