https://bugzilla.redhat.com/show_bug.cgi?id=1532250 Bug ID: 1532250 Summary: perl-Net-SSLeay fails to connect to some SSL servers Product: Fedora Version: 27 Component: perl-Net-SSLeay Assignee: paul@xxxxxxxxxxxx Reporter: mal@xxxxxxxxxx QA Contact: extras-qa@xxxxxxxxxxxxxxxxx CC: jose.p.oliveira.oss@xxxxxxxxx, kasal@xxxxxx, paul@xxxxxxxxxxxx, perl-devel@xxxxxxxxxxxxxxxxxxxxxxx In F26 F27 compiled perl-Net-SSLeay-1.82-1.fc26.x86_64 fails to connect to some SSL servers, , but to the other can connect OK Below is a test case and two examples. www.google.com perl-Net-SSLeay connects OK www.halstead.com perl-Net-SSLeay fails. Code example xu.pl is below. This works OK perl -w xu.pl 'www.google.com' And this one fails, and without any meaningful diag perl -w xu.pl www.halstead.com P.S. strange thing that this works OK my($page) = Net::SSLeay::get_https('www.halstead.com', 443, '/'); ------- sample code xu.pl ---- use strict; require Net::SSLeay; require IO::Socket::SSL; #require IO::Socket::SSL qw(debug9); $Net::SSLeay::trace = 3; $Net::SSLeay::linux_debug =3 ; # simple client my $cl = IO::Socket::SSL->new($ARGV[0].":443"); print{*STDERR} "CL=",$cl,"\n"; print $cl "GET / HTTP/1.0\r\n\r\n"; print <$cl>; ----- end sample code ------------- This works OK perl -w xu.pl 'www.google.com' And this one fails, and without any Net::SSLeay diag, only SSL.pm perl -w xu.pl www.halstead.com Name "Net::SSLeay::trace" used only once: possible typo at xu.pl line 6. Name "Net::SSLeay::linux_debug" used only once: possible typo at xu.pl line 7. DEBUG: .../IO/Socket/SSL.pm:2764: new ctx 24108480 DEBUG: .../IO/Socket/SSL.pm:616: socket not yet connected DEBUG: .../IO/Socket/SSL.pm:618: socket connected DEBUG: .../IO/Socket/SSL.pm:641: ssl handshake not started DEBUG: .../IO/Socket/SSL.pm:674: using SNI with hostname www.halstead.com DEBUG: .../IO/Socket/SSL.pm:709: request OCSP stapling DEBUG: .../IO/Socket/SSL.pm:743: call Net::SSLeay::connect DEBUG: .../IO/Socket/SSL.pm:746: done Net::SSLeay::connect -> -1 DEBUG: .../IO/Socket/SSL.pm:749: local error: SSL connect attempt failed DEBUG: .../IO/Socket/SSL.pm:752: fatal SSL error: SSL connect attempt failed DEBUG: ...erl5/IO/Socket.pm:49: ignoring less severe local error 'IO::Socket::IP configuration failed', keep 'SSL connect attempt failed' DEBUG: .../IO/Socket/SSL.pm:2786: free ctx 24108480 open=24108480 DEBUG: .../IO/Socket/SSL.pm:2790: free ctx 24108480 callback DEBUG: .../IO/Socket/SSL.pm:2797: OK free ctx 24108480 CL=Use of uninitialized value $cl in print at xu.pl line 11. Can't use an undefined value as a symbol reference at xu.pl line 12. -- You are receiving this mail because: You are on the CC list for the bug. _______________________________________________ perl-devel mailing list -- perl-devel@xxxxxxxxxxxxxxxxxxxxxxx To unsubscribe send an email to perl-devel-leave@xxxxxxxxxxxxxxxxxxxxxxx
