use CGI;
use strict;
$cgi = CGI->new();

my $x = $cgi->param('$fname');
my $q = $cgi->param('$lname');

print "Content-Type: text/html\n\n";
print <<HTML;
<form method="get" action="welcome.pl">
<table width="100%">
<tbody><tr>
<td><table cellpadding="5">
<tbody><tr>
<td>Firstname</td>
<td><b>$x</b></td>
</tr>
<tr>
<td>Lastname</td>
<td><b>$q</b></td>
</tr>
</form>
HTML