use CGI qw/ :standard /;
my @futz = ( -cookie=> cookie(1..9), );
print header( @futz );
__END__
Set-Cookie: 1=2; domain=4; path=3; expires=Thu, 01-Jan-1970 00:00:06 GMT; secure; HttpOnly
Date: Mon, 22 Aug 2011 10:18:59 GMT
Content-Type: text/html; charset=ISO-8859-1