$build_prefix = substr Win32::GetBuild, 0, 2;

if ($build_prefix == '36') {
  # do something for .NET
} elsif ($build_prefix == '37') {
  # do something for 2003
}