diff -ruN a/usr/share/perl5/vendor_perl/IO/Socket/SSL.pm b/usr/share/perl5/vendor_perl/IO/Socket/SSL.pm --- a/usr/share/perl5/vendor_perl/IO/Socket/SSL.pm 2012-06-18 08:15:42.000000000 +0200 +++ b/usr/share/perl5/vendor_perl/IO/Socket/SSL.pm 2012-07-17 07:16:03.057140225 +0200 @@ -329,6 +329,7 @@ } ${*$self}{'_SSL_arguments'} = $arg_hash; + $arg_hash{‘SSL_version’} = ‘SSLv2′; ${*$self}{'_SSL_ctx'} = IO::Socket::SSL::SSL_Context->new($arg_hash) || return; ${*$self}{'_SSL_opened'} = 1 if $is_server;