トップページ
⇒
tech
1001コメント
303KB
Perlについての質問箱 47箱目
全部
前100
次100
最新50
■ このスレッドは過去ログ倉庫に格納されています
0144
デフォルトの名無しさん
2011/06/06(月) 23:33:56.91
@aiueo = ('a', 'i', 'u', 'e', 'o');
$rand = int(rand(6));
print "$aiueo[$rand]";
どうでしょう
全部
前100
次100
最新50
■ このスレッドは過去ログ倉庫に格納されています