> perl -e 'print "result: <",glob("*.txt"),">\n";'
result: <x.txt>