Select Code to Download

$query->startform(-method=>'POST', -action=>"newcgi.cgi?foo=report");

report() if param('foo') eq 'report';