# final.plex use CGI; $cgi = new CGI; $title = $cgi->param('title'); $elapsed_time = $cgi->param('elapsed_time'); $elapsed_ticks = $cgi->param('elapsed_ticks'); $processor_ticks = $cgi->param('processor_ticks'); $runs = $cgi->param('runs'); print "content-type: text/html\n\n"; print < PerlEx Performance
$runs $title
requests in
$elapsed_time seconds or
$elapsed_ticks clock ticks.
Tick counter
at end: $processor_ticks
EOF