$cookie = CGI::Cookie->new(-name => 'USERNAME',
                           -value => $encrypted,
                           -expires => '+3M',
                           -path => '/cgi-bin/recordz',
                           -secure => 1);
	    
print $query->header(-cookie=>$cookie);

##</code><code>##

	local our $cookie_in = $query->cookie('USERNAME');
	print "Content-Type: text/html\n\n";
	print $cookie_in;