Perl的LWP捲曲錯誤： 'SSL證書同行是不是OK'

Question

這裏是我的代碼：

my $lwpcurl = LWP::Curl->new(CURLOPT_SSL_VERIFYHOST => 0,CURLOPT_SSL_VERIFYPEER=>0); 
my $content; 
$content = $lwpcurl->get($url); 

我收到此錯誤：

`SSL peer certificate was not ok` 

Answer 1

LWP::Curl不接受CURLOPT_SSL_VERIFYHOST/CURLOPT_SSL_VERIFYPEER參數因爲它是構造函數！

使用LWP::Protocol::Net::Curl代替：

use LWP::Protocol::Net::Curl ssl_verifyhost => 0, ssl_verifypeer => 0; 
use LWP::UserAgent; 

my $ua = LWP::UserAgent->new; 
my $content = $ua->get($url); 

注意，LWP ::協議::網::捲曲改變默認的LWP :: UserAgent的行爲，所以你還是用$ua = LWP::UserAgent->new，雖然它使用libcurl內部。