如何使用Perl CGI设置cookie？

Question

我尝试使用Perl CGI设置cookie没有成功.

我的代码看起来像这样:

$qry = new CGI

$cookie = $qry->cookie(-name=>'SERVER_COOKIE',
                       -value=>'USER_NAME',
                       -path=>'/'),
$qry->header(-cookie=>$cookie)

页面不会抛出任何错误,但没有设置cookie!

我使用Firefox 3.5.5与附加组件来查看cookie.

我究竟做错了什么？

迦特

Answer 1

如果您丢失的分号只是粘贴问题的工件,那么关键点是您需要print调用header它才能将其发送到浏览器.

print $qry->header(-cookie=>$cookie);