Perlについての質問箱 37箱目

Perlについての質問箱 37箱目at TECH

Perlについての質問箱 37箱目 - 暇つぶし2ch160:デフォルトの名無しさん
08/08/18 19:19:20
>>157 発想を変えてみる
@str = (a..z,A..Z);
print $str[rand(@str)];