Help for this page

Select Code to Download


  1. or download this
    >perl -MWin32 -e "print(Win32::GetShortPathName($_), ' ') foreach (@AR
+GV);" "My Documents" "Start Menu"
MYDOCU~1 STARTM~1
  2. or download this
    sub deslash { local $_=$_[0]; s/\\(.)/$1/g; $_ }
s/"((?:[^"\\]|\\.)+)"/ deslash($1) /ge;