it returns: 200,500,200use strict; use warnings; use LWP::UserAgent; my @hostnames = ( 'google.com', 'microsoft.com', 'bing.com' ); my $ua = LWP::UserAgent->new; for my $host (@hostnames) { # my $res = $ua->head ("https://$host/"); my $res = $ua->get ("http://$host/"); print $res->code . "\n"; }
In reply to Re^2: Error 500 in LWP
by YarNik
in thread Error 500 in LWP
by YarNik
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |