作者b60413 (赖宏)
看板Perl
标题[问题] CGI使用模组
时间Fri Jan 25 22:26:51 2008
我有一个程式使用User::pwent来取得使用者密码
取得以後并且使用Crypt去加密判断有没有与系统密码符合
但是改成CGI版本以後却不能跑了
不知道是哪里出了问题
请各位帮忙DeBug一下 谢谢
程式目的主是要让使用者可以线上申请Mysql帐号,但卡在验证部份
my $userData=getpwnam("$FORM{'mysqlWorkID'}"); #取得User的帐号资讯
my $tmpData=$userData->passwd; #取得User的密码,只要将这行注解就可以正常使用
my @userPasswd=split(/\$/,$tmpData); #取得Crypt的$salt
my $testPasswd=unix_md5_crypt($FORM{'mysqlWordPass'},$userPasswd[2]); #使用Crypt加密密码
完整的Code下载:
http://140.126.21.72/mysql.rar
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 118.232.65.72
※ 编辑: b60413 来自: 118.232.65.72 (01/25 22:34)