use CGI::Cookie;
my $c = new CGI::Cookie(
  -name    =>  'COOKIENAME',
  -value   =>  'Whosyerdaddy',
  -expires =>  '+1M',
  -domain  =>  '.domain.com'
);
print "Set-Cookie: $c\n";