in reply to Re^5: Error 500 in LWP
in thread Error 500 in LWP
Here is a new code where Google returns a different code.
It returns:use strict; use warnings; use LWP::UserAgent; my @hostnames = ( 'http://google.com', 'https://google.com', 'http://microsoft.com', 'https://microsoft.com', 'http://bing.com', 'https://bing.com', ); my $ua = LWP::UserAgent->new; for my $host (@hostnames) { my $res = $ua->get ($host); print $res->code . ' => ' . $res->status_line . "\n"; } print "LWP: $LWP::VERSION\n"; print "IO::Socket::SSL: $IO::Socket::SSL::VERSION\n";
200 => 200 OK 500 => 500 Can't connect to google.com:443 (connect: Network is unreac +hable) 500 => 500 Can't connect to www.microsoft.com:443 (connect: Network is + unreachable) 500 => 500 Can't connect to www.microsoft.com:443 (connect: Network is + unreachable) 200 => 200 OK 200 => 200 OK LWP: 5.833 IO::Socket::SSL: 1.31
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^7: Error 500 in LWP
by hippo (Archbishop) on Aug 19, 2017 at 09:12 UTC | |
by YarNik (Sexton) on Aug 19, 2017 at 15:00 UTC | |
by hippo (Archbishop) on Aug 21, 2017 at 09:19 UTC |