Christian Wetzig wrote:
Hi,
the following worked fine under 1.99_09 in a perl module called from a simple mod_perl script (SetHandler perl-script, PerlHandler ModPerl::Registry):
> read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
But after upgrading to 1.99_10, the content of $buffer stops after the header of the first content part which is a file.
[...]
It's a known problem. I'll commit a fix soonish (I need to do some extra testing and rewrites). Meanwhile please replace
- read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'}); + $r->read($buffer, $ENV{'CONTENT_LENGTH'});
That should do the trick.
Christian, can you please revert that change and verify with the current cvs that I've fixed that problem (you will probably want to keep $r->read() after the test). I've just committed the fix. You can get the cvs version from:
http://perl.apache.org/download/source.html#Development_mod_perl_2_0_Source_Distribution
(though don't use the snapshot unless you do that about 6 hours after you've read this email, since it won't contain the latest changes).
Thanks.
__________________________________________________________________ Stas Bekman JAm_pH ------> Just Another mod_perl Hacker http://stason.org/ mod_perl Guide ---> http://perl.apache.org mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com http://modperlbook.org http://apache.org http://ticketmaster.com
-- Reporting bugs: http://perl.apache.org/bugs/ Mail list info: http://perl.apache.org/maillist/modperl.html
