松本です。 最終的には、こんなんしました。まんまですね。 最初の文字だけ英字でないとパスワードという感じがしません。 １００個作成して、脆弱性の試験をかけるというシナリオです。 これも簡単にかけたらうれしいのだけど。 perl -e '@a = (a..z,A..Z); map{print $a[int rand 52];\ print pack "c7",map{33+int rand 93}(1..7);print "\n"}(1..100)'