Select Code to Download

print header(), start_html;
my $page = "E:/companyname/website/htdocs/resources/header_1.htm";
open (PAGE, "$page") || die "Couldn't open $page";
while (<PAGE>) {print;}

my $LastName=param('LastName');
# pattern should match sql field requirement 
...
 print invalid page request .html
}