srand

---

srand EXPR

　乱数の系列を設定します。EXPRを省略するとsrand(time)を実行します。

---

サンプルプログラム

# 1〜100の乱数を10個取得(毎回同じ値)
srand 100;
foreach (1..10) {
	my $foo = int(rand 100) + 1;
	print "$foo\n";
}

---

関連項目

・乱数の取得
・メルセンヌ・ツイスター法による乱数取得
・int関数
・rand関数