Select Code to Download

use Errno ':POSIX';
$SIG{PIPE} = 'IGNORE';
...
        die "I/O error: $!";   # this is more serious, so die
    }
}