This is part of The Pile, a partial archive of some open source mailing lists and newsgroups.
To: mod_perl list <modperl@apache.org> From: Stas Bekman <stas@stason.org> Subject: flushing appears to be broken with perl 5.6.0 Date: Mon, 8 Jan 2001 16:46:10 +0100 (CET) Hi, This simple Apache::Registry script is supposed to print the PID and then hang, it used to work with older mod_perl/perl versions, it doesn't print the PID now -- rflush doesn't seem to work. (neither $|=1 works) my $r = shift; $r->send_http_header('text/plain'); $r->print("PID = $$\n"); $r->rflush; while(1){ sleep 1; } I've tested it with mod_perl-1.24_(01|02)/apache-1.3.14 and mod_perl-1.24/apache-1.3.12 with perl 5.6.0 (running on Linux). Has it something to do with bugs in 5.6.0? If you have the patched version of 5.6.0 can you please test it? === To: mod_perl list <modperl@apache.org> From: Stas Bekman <stas@stason.org> Subject: Re: flushing appears to be broken with perl 5.6.0 Date: Mon, 8 Jan 2001 17:17:54 +0100 (CET) On Mon, 8 Jan 2001, Stas Bekman wrote: > Hi, > > This simple Apache::Registry script is supposed to print the PID and then > hang, it used to work with older mod_perl/perl versions, it doesn't print > the PID now -- rflush doesn't seem to work. (neither $|=1 works) > > my $r = shift; > $r->send_http_header('text/plain'); > > $r->print("PID = $$\n"); > $r->rflush; > > while(1){ > sleep 1; > } > > I've tested it with mod_perl-1.24_(01|02)/apache-1.3.14 and > mod_perl-1.24/apache-1.3.12 with perl 5.6.0 (running on Linux). > > Has it something to do with bugs in 5.6.0? If you have the patched version > of 5.6.0 can you please test it? As pointed out by Niraj Sheth in the private reply I had a problem with front-end buffering. Accessing the back-end server directly solves the problem. Which leads to a question, on how to make the real flush. Currently rflush and ($|=1) are quite useless if there is a buffering process at the front end side. === To: "'Stas Bekman'" <stas@stason.org>, mod_perl list <modperl@apache.org> From: "Sheth, Niraj " <niraj_sheth@groton.pfizer.com> Subject: RE: flushing appears to be broken with perl 5.6.0 Date: Mon, 8 Jan 2001 11:29:07 -0500 Stas, I am printing 4k of data for each push .. # this to flush buffer of front end proxy-server. my $new_line = "\n" x 4096; print $new_line; (make sure gzip filter if off ...) http://forum.swarthmore.edu/epigone/modperl/kerdsnestim/14702.7611.496757.13 9565@ampato.core.aeccom.com I am sure there are some other more efficient solutions which I don't know, but would like to know. ===