On Mon, 9 Sep 2002 14:31:44 +0300, [EMAIL PROTECTED] (Hytham Shehab)
wrote:
> > $|++;
> this won't work man
> u didn't get my q,
> i need to push data into output without the need to recall the entire
>script
> to print the whole plus the new data, i want em to print only the new data.
> thx
R u looking 4 "nph-push"?
############################################################
#! /usr/bin/perl
$|=1; # don't buffer output
$BOUNDARY="--start-new-page-here--"; # seperates html pages
print "HTTP/1.0 200 OK\n";
print "Pragma: no-cache\n";
print "Content-type: multipart/x-mixed-replace;boundary=$BOUNDARY\n\n";
print "$BOUNDARY\n"; # tells browser to start a new
page
print "Content-type: text/html\n\n"; # tells it what kind
for ($count=10; $count >= 0; $count--) {
print "<h1>$count</h1>\n";
print "Get ready. Here comes <b>" . ($count -1) . "</b>!\n";
sleep('1');
print "$BOUNDARY\n";
print "Content-type: text/html\n\n";
}
print "<h1>boom!</h1>\n";
print "</html>"; # don't forget this!
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
