C:\Perl\Scripts>perl -e "@s = Win32::GetOSVersion; print \"$s[-1] $s[1] $s[2]\""
On a X86 2K3 system, I get 3 5 2 And on a X86 W2K Server, 3 5 0 Steven -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Sisyphus Sent: Wednesday, May 23, 2007 9:39 AM To: perl-win32-users Subject: Problem with Win32::GetOSVersion() Hi, The Win32 documentation (wrt Win32::GetOSVersion) states: ------------------------------------- Win32::GetOSVersion() [CORE] Returns the list (STRING, MAJOR, MINOR, BUILD, ID), ... . . Currently known values for ID MAJOR and MINOR are as follows: OS ID MAJOR MINOR Win32s 0 - - Windows 95 1 4 0 Windows 98 1 4 10 Windows Me 1 4 90 Windows NT 3.51 2 3 51 Windows NT 4 2 4 0 Windows 2000 2 5 0 Windows XP 2 5 1 Windows Server 2003 2 5 2 Windows Vista 2 6 0 ------------------------------------- I'm running Vista64, so I expect the following one liner to print out "2 6 0": C:\_64\C>perl -e "@s = Win32::GetOSVersion; print \"$s[-1] $s[1] $s[2]\"" But it prints out "1 6 0". Does anyone know what's going on ? (This is using the 64-bit build of AS 820 on an AMD64 box.) Cheers, Rob _______________________________________________ Perl-Win32-Users mailing list [email protected] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs _______________________________________________ Perl-Win32-Users mailing list [email protected] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
