$ perl -MFile::Glob -wle 'print glob "x"'
x