use CGI; my $cgi = new CGI; my $counter = $cgi->param('counter'); if ($counter < 1) { $counter = 1; } my $next = $counter + 1; my $url = "simple.plex?counter=$next"; if ($next > 100) { $url = "frame_perl.plex?script=simple.pl&runs=100"; } print "Content-Type: text/html\r\n\r\n"; print < PerlEx Performance

$counter

PerlEx

EOF