use CGI qw/:standard/;
use CGI::Carp qw( fatalsToBrowser );


"7.) What do you want to name the report:",
textfield('report'),

##</code><code>##

# Make sure a report name is defined
 
my $report = param('report');
 
if (!defined($report)) {
    die "You must supply a filename.\n";
}