>perl -MWin32 -e "print(Win32::GetShortPathName($_), ' ') foreach (@ARGV);" "My Documents" "Start Menu"
MYDOCU~1 STARTM~1