Perl命令生成小写，大写和数字的字符串

Question

我必须修改此命令以包含随机数和大写字母：

 perl -le "print map{('a'..'z')[rand 26]} 1..8"

到目前为止，我已经尝试过：

perl -le "print map{('a'..'z')[rand 26]} map{(0..9)[rand 10]} 1..12"

仅使它的str变小并且在字符串中不生成任何数字

Answer 1

将大写字母和数字添加到map列表，并将数字增加到63（52个字母加10个数字加!）：

perl -le "print map{('a'..'z','A'..'Z',0..9,'!')[rand 62]} 1..12"

高尔夫很有趣：）

perl -E"say map{(a..z,A..Z,0..9,'!')[rand 63]}a..l"