1

我正在尝试实现一个购物网站。单击结帐按钮时,我正在尝试检查用户是否已经登录。如果是想向他显示付款表格,否则登录表格。

虽然他提供了正确的信息(用户名和密码),但在登录脚本中我正在尝试创建一个会话。

// On providing correct username and password

use CGI::Session qw();
my $s = CGI::Session->new;
$s->param(User_id => 12);
my $id = $s->id; # e.g. '4cd29ac608405e4d0a463d153e64defd'

我想利用那个会话ID。

我的问题是如何将会话 ID 存储在 HTML 中,并利用它来显示基于此会话 ID 的不同表单。

非常感谢您的帮助。

德韦什

4

1 回答 1

0

我将从阅读此页面开始:http: //perldoc.perl.org/CGI/Cookie.html

CGI::Cookie 对象将允许您将会话 ID 存储在浏览器的 cookie 中。

这是如何保存和读取 cookie 的示例:

$cookie_sid = CGI::Cookie->new(-name=>'SID',-value=>$session_id);

print header(-cookie=>[$cookie_sid]);

# reading cookies
%cookies = CGI::Cookie->fetch;
$id = $cookies{'SID'}->value;
于 2013-10-01T12:37:58.530 回答