Geno Patterson -- script7b.htm




#!/usr/bin/perl

# script7b.cgi -- Cookie reader for assignment7

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

EndOfHTML
;