print "

"; print "Good-bye Cruel World
\n"; ####

#### use CGI; use strict; my $CGI = CGI->new; # this assumes the creating HTML has a option list called # my_menu my $report_num = $CGI->param("my_menu"); # do some stuff to lookup the report based on $report_num ... # output print header; my $t = HTML::Template->new( filename => 'nc1_rpt1_summary.tmpl' ); $t->param( foo => 'FakeDomain.com', stuff => "blah", morestuff => "foobar", %hashofstufffromDB, ); print $t->output;