c:\windows\system32>perl -MFile::Glob=bsd_glob -wle "print for bsd_glob shift" "C:/Program Files/*"
C:/Program Files/HP