use CGI;
my $cgi = CGI->new();
$cookie = $cgi->cookie( 
    -name  => 'cookie_name', 
    -value => 'cookie_value', 
);
# CGI->header also takes care of outputing the Content-type
print $cgi->header( -cookie => $cookie );