Christopher P. Lindsey wrote:
[...]
It looks like the problem is repeated print statements. I basically
had a loop that did
while ($ref = $sth-fetchrow_arrayref()) {
print $$ref[0], $$ref[2], etc.
}
Changing it to
my $output;
while ($ref = $sth-fetchrow_arrayref()) {
However, I've noticed that scripts that generate lot of output take
substantially longer to run than their CGI counterparts.
The CGI script took 1.59 seconds to run, whereas the mod_perl version
took 3.38 seconds. It generates about 321K of output.
Are you positive that