my $utc_module;
BEGIN {
    if ($^O eq 'win32') { # oder Win32, keine ahnung
        $utc_module = eval "use Win32::Something (...); 1;" || 0;
    }
    else {
        $utc_module = 0;
    }
}