--- libwww-perl-5.803/lib/LWP/Protocol/https10.pm-	2003-10-23 23:11:33 +0400
+++ libwww-perl-5.803/lib/LWP/Protocol/https10.pm	2005-04-14 22:59:47 +0400
@@ -11,14 +11,8 @@
     $SSL_CLASS = "IO::Socket::SSL"; # it was already loaded
 }
 else {
-    eval { require Net::SSL; };     # from Crypt-SSLeay
-    if ($@) {
-	require IO::Socket::SSL;
-	$SSL_CLASS = "IO::Socket::SSL";
-    }
-    else {
-	$SSL_CLASS = "Net::SSL";
-    }
+    require Net::SSL;     # from Crypt-SSLeay
+    $SSL_CLASS = "Net::SSL";
 }
 
 
--- libwww-perl-5.803/lib/Net/HTTPS.pm-	2002-12-23 21:16:29 +0300
+++ libwww-perl-5.803/lib/Net/HTTPS.pm	2005-04-14 23:01:06 +0400
@@ -12,21 +12,8 @@
     $SSL_SOCKET_CLASS = "IO::Socket::SSL"; # it was already loaded
 }
 else {
-    eval { require Net::SSL; };     # from Crypt-SSLeay
-    if ($@) {
-	my $old_errsv = $@;
-	eval {
-	    require IO::Socket::SSL;
-	};
-	if ($@) {
-	    $old_errsv =~ s/\s\(\@INC contains:.*\)/)/g;
-	    die $old_errsv . $@;
-	}
-	$SSL_SOCKET_CLASS = "IO::Socket::SSL";
-    }
-    else {
-	$SSL_SOCKET_CLASS = "Net::SSL";
-    }
+    require Net::SSL;      # from Crypt-SSLeay
+    $SSL_SOCKET_CLASS = "Net::SSL";
 }
 
 require Net::HTTP::Methods;