in reply to Re: Trouble with browser file upload for large files
in thread Trouble with browser file upload for large files

I tried switching off output buffering by adding 
select(STDOUT);
$| = 1;

[download]
at the start of my code, and by putting 
print "."

[download]
in the while loop (above) which is writing to the upload file. I though this would print dots during the course of the upload, but it doesn't, why not?

Replies are listed 'Best First'.
Re: Re: Re: Trouble with browser file upload for large files
by cLive ;-) (Prior) on May 29, 2002 at 00:23 UTC
    try adding a newline: 
    print ".\n";

    [download]

    cLive ;-)

    --
    seek(JOB,$$LA,0);

[reply]
[d/l]
      Unfortunately that didn’t work either...
[reply]

        Aside from turning output buffering off, you'll need to do a print $cgi->header(); and print the <html> and <body> tags before you start printing your dots - when I last did this I used hashes (#) because they're a bit easier to see!

[reply]
[d/l]
[select]
      Even though I've turned off output buffering the browser isn't displaying the next page until the complete upload is complete....my code is as follows 
      print $query->header(-Refresh=>'5;URL=http://baz.perlmonk.org/main.cgi
+');

print $query->start_html("Submission Added");

      [download]
      would the refresh be switching the buffering back on?
[reply]
[d/l]

In Section Seekers of Perl Wisdom