Help for this page
print "Content-type: text/html\n"; print "Set-Cookie: foo=bar; path=/; expires=Mon, 01-Jan-2001 00:00:00 +GMT\n\n";
@nvpairs=split(/; /, $ENV{'HTTP_COOKIE'}); foreach $pair (@nvpairs) { ($name, $value) = split(/=/, $pair); }
$cookie{$name} = $value;