perl -MCPAN -e shell
cpan[1]>install LWP::Protocol::connect
or
cpan[1]> install LWP::Protocol::https
##########################################################################
#!/usr/bin/perl
use LWP::UserAgent;
use HTML::TokeParser;
my $ua = LWP::UserAgent->new(ssl_opts => { verify_hostname => 1 });
#如果出現Can't connect to flora2.epa.gov.tw:443 (certificate verify failed)
#
#SSL connect attempt failed error:14090086:SSL #routines:SSL3_GET_SERVER_CERTIFICATE:certificate verify failed at /usr/local/share/perl5/LWP/Protocol/http.pm line 47.
#類似這類的訊息，則改為verify_hostname =>0
$ua->agent("Mozilla/4.0 (compatible; MSIE 5.12; Mac_PowerPC)");
my $res = $ua->get("https://example.com");
my $stream = HTML::TokeParser->new(\$res->decoded_content);
...
...
...
##########################################################################
可以參考 https://blog.51cto.com/flyingsnail/989998
