#!/usr/bin/perl

use warnings;
use strict;


$|=1;

use CGI qw/:standard/;

print header;

print "line one<br>\n";
print ' ' x 4096;
sleep(3);
print "line two<br>\n";
print ' ' x 4096;
sleep(3);
print "line three<br>\n";
print ' ' x 4096;
sleep(3);
print "line four\n";
print "<br>\n";
sleep(3);
[download]

This may force flushing output buffers on some proxies. Some proxies maybe need larger padding. Some browsers (notably older ones) always wait until the whole response is received before rendering.