松本です。 特殊記号も使用するなら、こんなんどうでしょう。 # perl -e 'print pack "c8",map{33+int rand 62}(1..8)' 9]^8QD14 もっと短くできますかね。