#!/usr/local/bin/perl5_8 #Start program for Campus Financial Reports use strict; use CGI; use CGI::Carp qw(fatalsToBrowser); #remove for PRD else security hole use HTML::Template; my $CGI = CGI->new; # Clear the buffers & print the html headers to avoid problems $|=1; print "content-type: text/html\n\n"; my $template = HTML::Template->new( filename => 'nc1_mainmenu.tmpl', associate => $CGI, ); print $template->output(); print "

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