Geno Patterson -- listing6b.htm -- Listing for script6b.cgi


#!/usr/bin/perl
print "Content-type:text/html\n\n";
$geno = $ENV{'HTTP_COOKIE'};
($name,$cid) = split(/=/,$geno); 
print <<EndOfHTML;
<html><head><title>Geno Patterson -- script6b.cgi</title></head>
<body>
<h2>Welcome back $cid!!!</h2>
</body></html>

EndOfHTML