Chinaunix

标题: perl cgi::session如何判断session已过期？ [打印本页]

作者: djq1976 时间: 2005-01-29 18:07
标题: perl cgi::session如何判断session已过期？
use CGI::Session;
   use DBI;
   my $dbh=DBI->;connect("dbi:mysql:exam",$dbuser,$dbpass);
   my $session = new CGI::Session("driver:MySQL", $sid, {Handle=>;$dbh});
my $sid=$session->;id();
               $session->;param('username',$username);
               $session->;param('utype', $type);
               $session->;expire('+60s');
               $dbh->;disconnect();

请高手指点，并请指点在每个页面里面session的使用方法，也就是说判断已经登录了，而不是盗用sid，想写成require login.pl的形式，可如果往mod_perl转好像不太方便，请指教，估计也是大多数初学者的问题。

作者: Qiang 时间: 2005-01-30 00:54
标题: perl cgi::session如何判断session已过期？
http://search.cpan.org/~sherzodr/CGI-Session-3.95/Session.pm CGI::Session 文档里详细有说 :

expire($time)

Second form sets an expiration time. This value is checked when previously stored session is asked to be retrieved, and if its expiration date has passed will be expunged from the disk immediately and new session is created accordingly. Passing 0 would cancel expiration date.

session 以前在这里讨论过了.
http://chinaunix.net/jh/25/246481.html
http://bbs.chinaunix.net/forum/viewtopic.php?t=482234&show_type=new

作者: yzcdf 时间: 2005-01-31 11:53
标题: perl cgi::session如何判断session已过期？

难啊！！

作者: superdoctor 时间: 2005-01-31 17:22
标题: perl cgi::session如何判断session已过期？
设置一个超时时间就可以了，此session到了时间后会将服务器端的session删除，使用时没有任何特殊的地方

欢迎光临 Chinaunix (http://bbs.chinaunix.net/)