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