D:\Temp>perl -e "print join ','=>Win32::GetOSVersion()"
Service Pack 2,5,1,2600,2