commit 1d5f0d582c6e82af834adbf60ba75032631b9a32
Author: David Steinbrunner <dsteinbrunner@pobox.com>
Date:   Sat Jul 27 13:15:07 2013 -0400

    Variation on RT#86707 to pass failing test

diff --git a/t/SSL_test.t b/t/SSL_test.t
index 040d9ac..c12c1e0 100644
--- a/t/SSL_test.t
+++ b/t/SSL_test.t
@@ -76,6 +76,9 @@ my $ok = eval {
         my $remote = IO::Socket::SSL->new(
             PeerAddr => $env->{'hostname'},
             PeerPort => $env->{'ports'}->[0],
+            # Would use SSL_VERIFY_NONE but that means you have to do a 'use'
+            # on IO::Socket::SSL which is trying to be avoided here
+            SSL_verify_mode => Net::SSLeay::VERIFY_NONE(),
         ) || die "Couldn't open child to sock: $!";
 
         my $line = <$remote>;