my $cookie = new CGI::Cookie(-name=>'cookie',-value=>'');
	print $q->header(-type=>'text/html', -cookie=>$cookie );