Stas,
The patch seems to work based on one previously affected client! However,
it's
evening here and everyone has gone home. I'll unfortunately need to wait
until
Monday to test more affected clients. I'll let you know then the results,
but
so far so good!
Thanks,
Scott
> Scott, please try this patch:
>
> --- CGI.pm.orig 2003-10-31 13:45:06.000000000 -0800
> +++ CGI.pm 2003-10-31 13:58:28.000000000 -0800
> @@ -515,8 +515,15 @@
> }
>
> if ($meth eq 'POST') {
> -
$self->read_from_client(\*STDIN,\$query_string,$content_length,0)
> - if $content_length > 0;
> + if ($content_length > 0) {
> + my $len = $content_length;
> + while ($len > 0) {
> + my $data = '';
> + my $read =
$self->read_from_client(\*STDIN,\$data,$len,0);
> + $len -= $read;
> + $query_string .= $data if $read > 0;
> + }
> + }
> # Some people want to have their cake and eat it too!
> # Uncomment this line to have the contents of the query string
> # APPENDED to the POST data.
