$ touch 'foo bar.txt' $ perl -MFile::Glob=:glob -e 'print for <*foo bar*>'