1

LWP::UserAgent を使用して単純な HTTP Post を実行すると、以下のエラーが発生します。オンラインで多くの検索を行ったところ、修正されたバグがしばらく前にあったようです。バージョン 6.03 を修正する必要があります。なぜこれが起こっているのかについてのアイデアはありますか?

'_content' => 'read failed:  at /usr/local/share/perl/5.10.1/Net/HTTP/Methods.pm line 256
 at /usr/local/lib/perl/5.10.1/Net/SSL.pm line 211
        Net::SSL::die_with_error(\'LWP::Protocol::https::Socket=GLOB(0x8d9aa38)\', \'read failed\') called at /usr/local/lib/perl/5.10.1/Net/SSL.pm line 224
        Net::SSL::read(\'LWP::Protocol::https::Socket=GLOB(0x8d9aa38)\', \'\', 1024, 0) called at /usr/local/share/perl/5.10.1/Net/HTTP/Methods.pm line 256
        Net::HTTP::Methods::my_readline(\'LWP::Protocol::https::Socket=GLOB(0x8d9aa38)\', \'Status\') called at /usr/local/share/perl/5.10.1/Net/HTTP/Methods.pm line 343
        Net::HTTP::Methods::read_response_headers(\'LWP::Protocol::https::Socket=GLOB(0x8d9aa38)\', \'laxed\', 1, \'junk_out\', \'ARRAY(0x8cd3d98)\') called at /usr/local/share/perl/5.10.1/LWP/Protocol/http.pm line 378

コードサンプルは次のとおりです。

use LWP::UserAgent;
use Data::Dumper;

my $ua = LWP::UserAgent->new;
$ua->timeout(10);
$ua->env_proxy;

my $response = $ua->get('https://metacpan.org/module/LWP::UserAgent');
print Dumper($response);
4

1 に答える 1

0

IO :: Socket :: SSLの最新バージョンを使用していることを確認してください。必要なバージョン（1.38）では不十分です（1.54をインストールしたばかりで、正常に動作しているようです）。

https://metacpan.org/source/GAAS/LWP-Protocol-https-6.03/Makefile.PL-これは1.54に依存してリリースされました-うまくいけば、それで問題が解決するでしょう。

于 2012-02-07T10:23:52.177 に答える