--- Net_SSLeay.pm-1.25/SSLeay.pm~	2003-10-17 13:16:21 +0000
+++ Net_SSLeay.pm-1.25/SSLeay.pm	2003-10-17 13:20:55 +0000
@@ -1588,7 +1588,7 @@ sub debug_read {
 
 sub ssl_read_all {
     my ($ssl,$how_much) = @_;
-    $how_much = 2000000000 unless $how_much;
+    $how_much = 200000000 unless $how_much;
     my ($got, $errs);
     my $reply = '';
 
@@ -1605,7 +1605,7 @@ sub ssl_read_all {
 
 sub tcp_read_all {
     my ($how_much) = @_;
-    $how_much = 2000000000 unless $how_much;
+    $how_much = 200000000 unless $how_much;
     my ($n, $got, $errs);
     my $reply = '';
 
@@ -1703,7 +1703,7 @@ sub ssl_read_until ($;$$) {
     # N.B. 0.9.6a has security problems, so the support for
     #      anything earlier than 0.9.6e will be dropped soon.
     if (&Net::SSLeay::OPENSSL_VERSION_NUMBER >= 0x0090601f) {
-	$max_length = 2000000000 unless (defined $max_length);
+	$max_length = 200000000 unless (defined $max_length);
 	my ($pending, $peek_length, $found, $done);
 	while (blength($reply) < $max_length and !$done) {
 	    #Block if necessary until we get some data