RE: Help on debugging print problem

2013-05-30 Thread Chris Faust
. Oh well, back to the drawing board. Thanks -Chris From: Marcus Don [mailto:m...@names.co.uk] Sent: Thursday, May 30, 2013 12:00 PM To: Chris Faust Cc: modperl@perl.apache.org Subject: Re: Help on debugging print problem I suspect you can just to this... my $size = -s

Re: Help on debugging print problem

2013-05-30 Thread Marcus Don
t; my $body_len = calculate_body_len(); > $r->set_content_length($body_len); > $r->rflush; > > Which just did nothing. > > Thx > -Chris > > From: Marcus Don [mailto:m...@names.co.uk] > Sent: Thursday, May 30, 2013 9:12 AM > To: Chris Faust > Cc: modper

RE: Help on debugging print problem

2013-05-30 Thread Chris Faust
>set_content_length($body_len); $r->rflush; Which just did nothing. Thx -Chris From: Marcus Don [mailto:m...@names.co.uk] Sent: Thursday, May 30, 2013 9:12 AM To: Chris Faust Cc: modperl@perl.apache.org Subject: Re: Help on debugging print problem At a guess, I'd say you

Re: Help on debugging print problem

2013-05-30 Thread Marcus Don
At a guess, I'd say your new machine is using chunked output, so you might need to add a size header. Marcus On 30 May 2013, at 12:11, "Chris Faust" wrote: > Hi, > > I have some code I use all the time I use to download a file: > > if (-e '/report.pdf') { > open(PDF, '/rep

Help on debugging print problem

2013-05-30 Thread Chris Faust
Hi, I have some code I use all the time I use to download a file: if (-e '/report.pdf') { open(PDF, '/report.pdf') or die "could not open PDF $!"; binmode PDF; my $output = do { local $/; }; close(PDF); $r