Thanks, that did the job. I'm currently testing for side effects but it all looks good so far.
On Mar 18, 2010, at 4:09 AM, Torsten Förtsch wrote: > On Thursday 18 March 2010 11:54:53 Mårten Svantesson wrote: >> I have never worked directly with the APR API but in the example above >> couldn't you prevent the request pool from growing by explicitly reusing >> the bucket brigade? >> >> Something like (not tested): >> >> sub { >> my ($r)=...@_; >> >> my $ba=$r->connection->bucket_alloc; >> my $bb2=APR::Brigade->new($r->pool, $ba); >> until( -e '/tmp/stop' ) { >> $bb2->insert_tail(APR::Bucket->new($ba, ("x"x70)."\n")); >> $bb2->insert_tail(APR::Bucket::flush_create $ba); >> $r->output_filters->pass_brigade($bb2); >> $bb2->cleanup(); >> } >> >> $bb2->insert_tail(APR::Bucket::eos_create $ba); >> $r->output_filters->pass_brigade($bb2); >> >> return Apache2::Const::OK; >> } >> > Thanks for pointing to the obvious. This doesn't grow either. > > Torsten Förtsch > > -- > Need professional modperl support? Hire me! (http://foertsch.name) > > Like fantasy? http://kabatinte.net