Select Code to Download

if(  $! == ECONNREFUSED()  ) {
    ...connection was refused...
...
} else {
    ...some other error...
}

BEGIN {
    if(  $^O =~ /Win32/i  ) {
...
          or  die $@;
    }
}