if ($^O eq 'MSWin32') {
    $ver = `ver`;
    $ver =~ s/\n//;
    print "Windows: $ver\n"
}