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