my $c = new CGI::Cookie( -name => 'USER', -path => '/', -value => $userid, -domain => getdomain(), ); print "Set-Cookie: $c\n";