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

##</code><code>##

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