是否有一个perl模块来验证存储在“{crypt} hashedpassword”中的密码&QUOT; {SSHA} hashedpassword&QUOT; &QUOT; {MD5} hashedpassword&QUOT;

本文介绍了是否有一个perl模块来验证存储在“{crypt} hashedpassword”中的密码&QUOT; {SSHA} hashedpassword&QUOT; &QUOT; {MD5} hashedpassword&QUOT;的处理方法，对大家解决问题具有一定的参考价值，需要的朋友们下面随着小编来一起学习吧！

问题描述

我有一个表格存储用户登录信息，其中包含以下方案中的密码。

I have a table which stores user login infomration, which contains passwords in the below scheme

{crypt} hashedpassword

{ssha} hashedpasswordsalted

{md5} hashedpassword

.....

{crypt}hashedpassword
{ssha}hashedpasswordsalted
{md5}hashedpassword
.....

是否有一个 perl模块了解此方案，并能够验证密码给出明文密码？

Is there a perl module that understands this scheme and is able to validate the password given the plain text password ?

如果有效的密码（helloworld），{@ p

Something like

谢谢。

推荐答案

可以这样做：

use Authen::Passphrase;

print "success!!\n" 
  if Authen::Passphrase->from_rfc2307('{CRYPT}r2sKInajXZ6Fk')->match("helloworld");

这篇关于是否有一个perl模块来验证存储在“{crypt} hashedpassword”中的密码&QUOT; {SSHA} hashedpassword&QUOT; &QUOT; {MD5} hashedpassword&QUOT;的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！