mod_perl memory...
am 28.05.2010 13:00:25 von Nishikant KapoorHello,
Following the thread
http://www.gossamer-threads.com/lists/modperl/modperl/101225 , I came up
with the following sub to display the output but the memory usage
continues to build up without limit when web pages are rendered. Any
suggestion/pointer would be greatly appreciated.
Here is the sub that outputs the page ($data is the entire web page in
one go, using HTML::Template):
sub sendOutput {
my $r = shift;
my $data = shift;
$r->content_type("text/html; charset=UTF-8");
my $ba=$r->connection->bucket_alloc;
my $bb=APR::Brigade->new($r->pool, $ba);
$bb->insert_tail(APR::Bucket->new($ba, $data));
$bb->insert_tail(APR::Bucket::flush_create $ba);
$r->output_filters->pass_brigade($bb);
$bb->cleanup;
$bb->insert_tail(APR::Bucket::eos_create $ba);
$r->output_filters->pass_brigade($bb);
return;
}
And, here is the 'free' snapshot every ten seconds (trimmed):
total used free
Mem: 262144 34668 227476
Mem: 262144 48432 213712
Mem: 262144 53392 208752
Mem: 262144 64360 197784
Mem: 262144 60760 201384
Mem: 262144 38980 223164
Mem: 262144 56440 205704
Mem: 262144 57436 204708
Mem: 262144 77364 184780
Mem: 262144 107568 154576
Mem: 262144 123388 138756
Mem: 262144 138628 123516
Mem: 262144 149004 113140
Thanks,
Nishi