Select Code to Download

500 Connect failed: connect: Connection timed out; Connection timed ou
+t
header ----Content-Type: text/plain
Client-Date:
...
response ---
Connect failed: connect: Connection timed out; Connection timed out at
+ /usr/lib/perl5/site_perl/5.8.8/LWP/Protocol/http.pm line 31
$

#!/usr/bin/perl
use LWP::UserAgent;
...
print "header ----" . $res->headers_as_string;
print "response ---" .  $res->as_string;