c:\windows\system32>perl -wle "print for glob shift" "C:/Program Files/*"
C:/Program