Perl 安全会话

Question

我想知道是否有任何方法可以在 Perl 中将会话 cookie (CGISESSID) 属性 isSecure 设置为 true？我知道至少在 php 中很容易与:

ini_set('session.cookie_secure', 1);

在 Perl 中有类似的方法吗？

交叉发布到 Perlmonks。

Answer 1

假设您使用 CGI::Cookie 构建您的 cookie，并且 $headers 是一个 HTTP::Headers 对象，您可以使用以下代码：

require CGI::Cookie;
my $cookie = CGI::Cookie->new(
    -name => 'testcookie', -value => 'testvalue', -secure => 1);
$headers->push_header(set_cookie => $cookie->as_string);

+- 错别字

HTH

Perl 安全会话

Perl secure session

perl

session-cookies