in reply to checking a url to make sure it works
should work from source code examinations, but if it doesn't this roundabout method ought to:$content = get($url); $error = 1 unless (defined $content);
use HTTP::Request; use LWP::UserAgent; my $ua = new LWP::UserAgent; my $request = HTTP::Request->new(GET => $url); my $response = $ua->request($request); $error = 1 unless ($response->is_success);
|
---|