use if 'MSWin32' eq $^O, Win32;
if ('MSWin32' eq $^O) {
    my $osname = MSWin::GetOSName();
}