print header(-type=>'text/html', -cookie=>$your_cookie ...)
##</code><code>##

Content-type: text/html\n
Cookie: $your_cookie\n\n