如何使用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);