$ perl -MWin32 -le " print $^X; print Win32::GetOSDisplayName() C:\perl\5.14.1\bin\MSWin32-x86-multi-thread\perl.exe Windows XP Home Edition Service Pack 3