if ($^O eq "MSWin32")
{
    $SIG{__DIE__} = \&win_die;
}