##

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

my $fname = $cgi->param('firstname');
my $lname = $cgi->param('lastname');

print "Content-Type: text/html\n\n";
print <



HTML

####

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 <


Firstname
$fname


Lastname
$lname




HTML


Firstname
$x


Lastname
$q