my $q = new CGI; my $firstname = $q->param('firstname'); my $lastname = $q->param('surname'); print qq|content-type: text/html\n\n|; print qq|
\n|; print qq|
|; print qq|
|; print qq||; ####