Since 1.950, IO::Socket::SSL->SSL_verify_mode default changed
from SSL_VERIFY_NONE to SSL_VERIFY_PEER, which breaks this test.
IO::Socket::SSL version 1.31 or later is needed for the
SSL_VERIFY_NONE constant.
--- t/SSL_test.t
+++ t/SSL_test.t
@@ -53,6 +53,7 @@
use_ok qw(Net::Server::Proto::SSL) or exit;
require Net::Server;
+use IO::Socket::SSL 1.31;
@Net::Server::Test::ISA = qw(Net::Server);
sub accept {
@@ -76,6 +77,7 @@
my $remote = IO::Socket::SSL->new(
PeerAddr => $env->{'hostname'},
PeerPort => $env->{'ports'}->[0],
+ SSL_verify_mode => SSL_VERIFY_NONE,
) || die "Couldn't open child to sock: $!";
my $line = <$remote>;