#!/usr/bin/perl

use warnings;
use strict;


$|=1;

use CGI qw/:standard/;


print header;

print "line one<br>\n";
sleep(3);
print "line two<br>\n";
sleep(3);
print "line three<br>\n";
sleep(3);
print "line four\n";
print "<br>\n";
sleep(3);