升级到ActivePerl v5.26.3时,LWP :: Simple和https出现问题

时间:2019-03-09 07:11:57

标签: perl ssl lwp

我最近从ActivePerl v5.20.2升级到了v5.26.3。

现在LWP :: Simple :: get与某些网站存在SSL问题

例如

#!c:/Perl64/bin/Perl.exe
# test perl scripts
use LWP::Simple;
#
$url = "https://www.bbc.co.uk/sport/rugby-union";
$content = get($url);
print "get succesful - ", length($content), " bytes read\n";
$url = "https://www.theguardian.com/cartoons/archive";
$content = get($url);
print "get succesful - ", length($content), " bytes read\n";

在旧版本上工作正常,但在新版本下使用

成功-读取214904字节

在C:/Perl64/lib/IO/Socket/SSL.pm第2739行中可以免费使用错误池977970,而不是890014001a5d9a5e。

SSL.pm的第2739行是

my $certid = eval { Net::SSLeay::OCSP_cert2ids($ssl,$cert) };

所以这与证书处理有关。

0 个答案:

没有答案