用Perl生成随机密码

 mkpasswd()生成一个默认的9位数的密码。

Crypt::RandPasswd模块

String::MkPasswd模块可以生成很安全但是非常难以记住的密码。假如你更希望生成可以拼读和轻易记忆的密码，那就考虑Crypt::RandPasswd模块吧。这个模块是自动密码生成器（Automated Password Generator）的一个实现，你可以用下面的步骤来使用它：

1. 安装这个模块

你可以用CPAN命令解释器来安装Crypt::RandPasswd，就像下面这样：

shell> perl -MCPAN -e shell
cpan> install Crypt::RandPasswd

或者，可以下载这个模块，并用下面的命令来安装它：

shell> perl Makefile.PL
shell> make
shell> make install

2. 生成密码

Crypt::RandPasswd模块带有一个word()函数，用来生成可拼读的随机密码。列表B是如何使用它的例子。

列表B

#!/bin/perl

# use module
use Crypt::RandPasswd;

# generate password
$word = Crypt::RandPasswd->word(5, 10);
print $word;

word()函数接受两个自变量：密码长度的上限和下限。下面就是输出结果的一个例子：

ijantyoph

提示：通过调用letters()方法你可以生成一个含有一串随机字母字符的密码，而不需要使用words()方法。

用这两个模块中的任何一个都可以提高你网络系统的安全性……那么你还等什么呢？

共2页: 上一页 [1] 2 下一页

评论加载中…