Well I do set the $ENV{PERL_LWP_SSL_VERIFY_HOSTNAME} = 0; so I guess the
change shouldn't affect me.
perl code
-----------------------------------
use LWP::Simple qw($ua get);
use IO::Socket::SSL qw(debug3);
$ua->timeout(5);
$ENV{PERL_LWP_SSL_VERIFY_HOSTNAME} = 1;
$contents = get("https://www.butler.edu/boa/default.aspx";);
-----------------------------------
with the perl version that doesnt hang:
strawberry perl 5.18.1.1
libwww-perl-6.05
DEBUG: .../IO/Socket/SSL.pm:1805: new ctx 39861360
DEBUG: .../IO/Socket/SSL.pm:449: socket not yet connected
DEBUG: .../IO/Socket/SSL.pm:451: socket connected
DEBUG: .../IO/Socket/SSL.pm:469: ssl handshake not started
DEBUG: .../IO/Socket/SSL.pm:504: using SNI with hostname www.butler.edu
DEBUG: .../IO/Socket/SSL.pm:527: set socket to non-blocking to enforce
timeout=5
DEBUG: .../IO/Socket/SSL.pm:540: Net::SSLeay::connect -> -1
DEBUG: .../IO/Socket/SSL.pm:550: ssl handshake in progress
DEBUG: .../IO/Socket/SSL.pm:560: waiting for fd to become ready: SSL wants
a read first
DEBUG: .../IO/Socket/SSL.pm:570: handshake failed because socket did not
became ready
DEBUG: .../IO/Socket/SSL.pm:1842: free ctx 39861360 open=39861360
DEBUG: .../IO/Socket/SSL.pm:1847: free ctx 39861360 callback
DEBUG: .../IO/Socket/SSL.pm:1850: OK free ctx 39861360
NO HANG :-)
with the perl version that hangs:
strawberry 5.18.2.2
libwww-perl-6.05
DEBUG: .../IO/Socket/SSL.pm:2137: new ctx 49554496
DEBUG: .../IO/Socket/SSL.pm:478: socket not yet connected
DEBUG: .../IO/Socket/SSL.pm:480: socket connected
DEBUG: .../IO/Socket/SSL.pm:498: ssl handshake not started
DEBUG: .../IO/Socket/SSL.pm:528: using SNI with hostname www.butler.edu
DEBUG: .../IO/Socket/SSL.pm:566: set socket to non-blocking to enforce
timeout=5
DEBUG: .../IO/Socket/SSL.pm:579: Net::SSLeay::connect -> -1
DEBUG: .../IO/Socket/SSL.pm:589: ssl handshake in progress
DEBUG: .../IO/Socket/SSL.pm:599: waiting for fd to become ready: SSL wants
a read first
DEBUG: .../IO/Socket/SSL.pm:619: socket ready, retrying connect
DEBUG: .../IO/Socket/SSL.pm:2098: ok=1 cert=53220176
DEBUG: .../IO/Socket/SSL.pm:2098: ok=1 cert=60570800
DEBUG: .../IO/Socket/SSL.pm:2098: ok=1 cert=60570608
DEBUG: .../IO/Socket/SSL.pm:1339: scheme=www cert=60570608
DEBUG: .../IO/Socket/SSL.pm:1348: identity=www.butler.edu
cn=www.butler.edualt=2
www.butler.edu 2 butler.edu
DEBUG: .../IO/Socket/SSL.pm:579: Net::SSLeay::connect -> -1
DEBUG: .../IO/Socket/SSL.pm:589: ssl handshake in progress
DEBUG: .../IO/Socket/SSL.pm:599: waiting for fd to become ready: SSL wants
a read first
DEBUG: .../IO/Socket/SSL.pm:619: socket ready, retrying connect
DEBUG: .../IO/Socket/SSL.pm:579: Net::SSLeay::connect -> 1
DEBUG: .../IO/Socket/SSL.pm:634: ssl handshake done
HANGS FOREVER :-(
/Jesper
On 21 May 2014 19:03, Tom Hukins <t...@eborcom.com> wrote:
> On Wed, May 21, 2014 at 06:57:58PM +0200, Jesper Persson wrote:
> > this perl code
> > ------------------------------------------
> > use LWP::Simple qw($ua get);
> > $ua->timeout(5);
> > $ENV{PERL_LWP_SSL_VERIFY_HOSTNAME} = 0;
> > $contents = get("https://www.butler.edu/boa/default.aspx";);
> > ------------------------------------------
> >
> > just tried fresh perl installs.
> >
> > strawberry perl 5.16.3.1: doesnt hang.
> >
> > strawberry perl 5.18.0.1: doesnt hang.
> >
> > strawberry perl 5.18.1.1: doesnt hang.
> >
> > strawberry perl 5.18.2.1: hangs.
> >
> > strawberry perl 5.18.2.2: hangs.
>
> I expect you're using different versions of LWP with these different
> versions of Perl and you're encountering the change documented at
> https://metacpan.org/pod/LWP#PERL_LWP_SSL_VERIFY_HOSTNAME
>
> Tom
>
