$ cat > a.pl #!/usr/bin/perl use CGI; $query = new CGI; $cookie1 = $query->cookie( -domain=>'foobar.com', -name=>'TheCookie', -value=>'anything ', -expires=>'+24h', -path=>'/', -secure=> 0); print $query->header(-cookie=>$cookie1); print" Done. "; print $query->end_html; $ perl a.pl Set-Cookie: TheCookie=anything%20; domain=foobar.com; path=/; expires=Sat, 25-Jun-2011 20:46:56 GMT Date: Fri, 24 Jun 2011 20:46:56 GMT Content-Type: text/html; charset=ISO-8859-1 Done. $