本文和大家重點(diǎn)討論一下Perl隨機(jī)數(shù)的概念，如果你需要為你的下一個(gè)游戲或者動(dòng)態(tài)Web網(wǎng)站的新特性設(shè)計(jì)一個(gè)簡(jiǎn)單的Perl隨機(jī)數(shù)生成器，那么rand()和srand()可能就是你所需要的。

如何產(chǎn)生Perl隨機(jī)數(shù)

Perl利用函數(shù)rand()和srand()為Perl隨機(jī)數(shù)（更確切的說(shuō)是“偽Perl隨機(jī)數(shù)”）字符串的生成提供了基本的工具。這些函數(shù)不是利用加密來(lái)提供安全性的，所以不要利用它們?yōu)槟憬鹑谛畔⒌募用?。但是，如果你需要為你的下一個(gè)游戲或者動(dòng)態(tài)Web網(wǎng)站的新特性設(shè)計(jì)一個(gè)簡(jiǎn)單的Perl隨機(jī)數(shù)生成器，那么rand()和srand()可能就是你所需要的。
函數(shù)rand()是真正的Perl隨機(jī)數(shù)生成器，而srand()會(huì)設(shè)置供rand()使用的Perl隨機(jī)數(shù)種子。函數(shù)rand()會(huì)返回一個(gè)處于0和你所指定的數(shù)值（缺省為1）之間的分?jǐn)?shù)。如果你在第一次調(diào)用rand()之前沒(méi)有調(diào)用srand()，那么系統(tǒng)會(huì)為你自動(dòng)調(diào)用srand()。

要注意，使用同種子相同的數(shù)調(diào)用srand()會(huì)導(dǎo)致相同的Perl隨機(jī)數(shù)序列被生成。這在有的時(shí)候很方便，尤其在游戲編程里，你可能想要重復(fù)讓隨機(jī)事件按照精確的相同序列出現(xiàn)。
像下面這樣使用rand()：
print"Yourluckynumberfortodayis:".int(rand(100)+1)."";

Perl隨機(jī)數(shù)指令：rand
語(yǔ)法：rand($interger)
說(shuō)明：常和函數(shù)srand搭配來(lái)取得一Perl隨機(jī)數(shù)，如果沒(méi)有先宣告stand函數(shù)的話，則取出的常數(shù)值是一個(gè)固定值。這個(gè)語(yǔ)法會(huì)返回一個(gè)介于0和$interger之間的數(shù)值，如果$interger省略的話，則會(huì)返回一個(gè)介于0和1的數(shù)值。

示例：
srand;#要先宣告srand函數(shù)，才能產(chǎn)生Perl隨機(jī)數(shù)的效果
$int=rand(10);#$int的值會(huì)大于0而且小于10如果希望產(chǎn)生的亂數(shù)是整數(shù)的話，就要再加上int#這個(gè)函數(shù)
$int=int(rand(10));#$int的值是一個(gè)整數(shù)，且值在0和9之間
--------------------------
$int=rand(10);
$int=int(rand(10));
print"intis$int\n";
運(yùn)行：
intis9
再次運(yùn)行：
intis7
#可見(jiàn)rand取的是Perl隨機(jī)數(shù)字

【編輯推薦】

1. 深入學(xué)習(xí)Perl運(yùn)算符用法
2. Perl文件句柄概念詳解
3. 解析四大Perl操作符用法
4. 專(zhuān)家推薦 幾款常用Perl開(kāi)發(fā)工具
5. 學(xué)習(xí)筆記 Perl數(shù)字與字符串間的自動(dòng)轉(zhuǎn)換