String::Randomを用いてパスワードをランダムに生成

[Perl] => [文字列操作]

String::Randomモジュールは指定したパターンに基づき、ランダムに文字列を生成してくれます。以下パスワードをランダムに生成する例になります。

[使用例]

#!/usr/bin/perl

print &random_password . "\n";

sub random_password {
use String::Random;
my $string_random = new String::Random;
$string_random->{'A'} = ['A'..'Z', 'a'..'z', 0..9];
my $pw = $string_random->randpattern('AAAAAAAA');
return $pw;
}