in reply to Can't connect to https using LWP::UserAgent
use strict; use warnings; use LWP::UserAgent; use HTTP::Request::Common qw(GET); use Net::SSL; my $ua = LWP::UserAgent->new(ssl_opts => { verify_hostname => 0}, ); my $req = GET 'https://ptabdata.uspto.gov/ptab-api/documents'; my $res = $ua->request($req); if ($res->is_success) { print $res->content; }else{ print $res->status_line . "\n"; }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Can't connect to https using LWP::UserAgent
by ruqui (Acolyte) on Feb 08, 2017 at 10:24 UTC | |
by vkhera (Novice) on Feb 08, 2017 at 14:11 UTC |