Why not just change:
$sock->write( "GET / HTTP/1.0\n\n" );
to:
$sock->write( "GET / HTTP/1.0\n\n" );
}
else {
...
}
$sock->write( "GET / HTTP/1.0\n\n" );
to:
Code:
if (defined $sock) { $sock->write( "GET / HTTP/1.0\n\n" );
}
else {
...
}