The Win32 module's GetOSVersion function covers some of this information. For example:

($verServicePack, $verMajor, $verMinor, $verBuild, $verId) =
      Win32::GetOSVersion();
[download]