sub handler {
my $r = shift;$r->content_type('text/plain');
my $chunk = "x";
for (1..70) {
my $before = $gtop->proc_mem($$)->size; $r->print($chunk);
$r->rflush; my $after = $gtop->proc_mem($$)->size;
warn sprintf "size : %-5s\n", GTop::size_string($after - $before),
}Apache::OK; }
This handler on its own requires just a few bytes. When feeding it to a simple pass-through unmodified filter it ends up allocating 70*40k = 2800kb. Obviously with 650MB file there are going to be many more buckets...
__________________________________________________________________ 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
