Проблема с LWP :: Simple и https при обновлении до ActivePerl v5.26.3 - PullRequest
Новая
       36

Проблема с LWP :: Simple и https при обновлении до ActivePerl v5.26.3

1 голос
/ 09 марта 2019

Я недавно обновил ActivePerl v5.20.2 до v5.26.3.

Теперь есть проблема с SSL с LWP :: Simple :: get для некоторых сайтов

, например 

#!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 байта прочитано

Свободен в неправильный пул 977970, а не 890014001a5d9a5e на C: /Perl64/lib/IO/Socket/SSL.pm line 2739.

Строка 2739 SSL.pm равна 

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

так что это как-то связано с обработкой сертификатов.

...