C:\_32>perl -MWin32 -e "print Win32::GetLongPathName('SwitcHes.txt') switches.txt