Select Code to Download

    print <<HEAD;
Set-Cookie: Name=foo
Set-Cookie: Passwd=bar
HEAD

    use CGI qw/:standard/;
    use CGI::Cookie;
...
        -value=>{ font => Helvetica, size => 12 });

    print header(-cookie=>[$cookie1,$cookie2]);