2007年4月25日

session过期时间的相关设定

摘要： session.auto_start 注意这个不要设为1，否则你在程序里就控制不了session的相关参数啦。 session.gc_maxlifetime = 1440; #默认after this number of seconds, stored ， 24分钟 session.cache_expire = 180; #這是網頁過期時間設置； session.gc_probabi... 阅读全文

posted @ 2007-04-25 14:54 古代 阅读(943) 评论(0) 推荐(0) 编辑

perl 利用CGI模块上传:取得上传的临时文件名以及文件的MD5

摘要： use CGI; use CGI qw/:standard/; use Digest::MD5 qw(md5_hex); my $query = CGI->new(\&hook,$PREF_logfh); my $filename = $query->param('uploadname'); ($filename,$file_ext) = ($filename =~ /(.*)\.(.+)... 阅读全文

posted @ 2007-04-25 14:52 古代 阅读(665) 评论(0) 推荐(0) 编辑

perl中抓http页面的方法

摘要： use HTTP::Request; use LWP::UserAgent; my $url = "http://".$PREF{webServer}."/index.php?act=upload&task=checkMd5&md5=".$md5."&id=".$PREF{uploadid}; my $ua = LWP::UserAgent->new; my $req = new ... 阅读全文

posted @ 2007-04-25 14:52 古代 阅读(422) 评论(0) 推荐(0) 编辑