PROSAGA码农传奇-perl-Perl：无法对HTTPS网站使用LWP :: Parallel

<div class =“post-text”itemprop =“text”>
  
    从您的代码：
  
   <pre>
 <code>
 $pua->nonblock('true');

</code>
 </pre>
  
    在查看LWP :: Parallel :: UserAgent的代码时，看起来对HTTPS的非阻塞支持完全被破坏了：
     <code>
 https
 </code>
     支持是在LWP :: Parallel :: Protocol :: https中实现的，它派生自LWP :: Parallel :: Protocol :: http for
    <a href="https://metacpan.org/source/MSOUTH/ParallelUserAgent-2.62/lib/LWP/Parallel/Protocol/https.pm#L31" rel="nofollow noreferrer">
      做实际的连接
    </A>
    。相关代码
    <a href="https://metacpan.org/source/MSOUTH/ParallelUserAgent-2.62/lib/LWP/Parallel/Protocol/http.pm#L100" rel="nofollow noreferrer">
      sub _connect
    </A>
    ：
  
   <pre>
 <code>
 103 unless ($nonblock) {
104 # perform good ol' blocking behavior
105 #
106 # this method inherited from LWP::Protocol::http
107 $socket = $self->_new_socket($host, $port, $timeout);
108 # currently empty function in LWP::Protocol::http
109 # $self->_check_sock($request, $socket);
110 } else {
111 # new non-blocking behavior
...
116 $socket =
117 IO::Socket::INET->new(Proto => 'tcp', # Timeout => $timeout,
118 $self->_extra_sock_opts ($host, $port));

</code>
 </pre>
  
    可以看到，对于（默认）阻塞情况，代码使用的功能
     <code>
 LWP::Protocol::http
 </code>
    ，但对于它直接使用的非阻塞情况
     <code>
 IO::Socket::INET
 </code>
     - 并不是
     <code>
 IO::Socket::SSL
 </code>
     用于HTTPS。但是LWP :: Protocol :: http（稍后使用）实际上需要SSL套接字并尝试调用
     <code>
 get_cipher
 </code>
     在上面。这会导致您看到的错误：
  
  <BLOCKQUOTE>
    
      无法通过/usr/share/perl5/LWP/Protocol/https.pm第119行中的包“IO :: Socket :: INET”找到对象方法“get_cipher”
    
  </BLOCKQUOTE>
  
    当不使用非阻塞支持时，代码似乎可以工作。
  
  
    至于HTTPS一般在这个模块中看到
    <a href="https://metacpan.org/source/MSOUTH/ParallelUserAgent-2.62/README.SSL" rel="nofollow noreferrer">
      README.SSL
    </A>
    ：
  
   <pre>
 <code>
 ** DISCLAIMER: https support is pretty buggy as of now. i haven't **
 ** had time to test much of it, so feel free to see if it works **
 ** for you, but don't expect it to :-)

</code>
 </pre>
  
    换句话说：您应该使用不同的模块来获得对HTTPS的可靠支持。
  
</DIV>

Perl：无法对​​HTTPS网站使用LWP :: Parallel :: UserAgent

Perl：无法对HTTPS网站使用LWP :: Parallel :: UserAgent