use Config; $PLATFORM = $Config{'osname'}; # and my @OS_VER = Win32::GetOSVersion;