專家答疑 如何產生Perl隨機數
本文和大家重點討論一下Perl隨機數的概念,如果你需要為你的下一個游戲或者動態Web網站的新特性設計一個簡單的Perl隨機數生成器,那么rand()和srand()可能就是你所需要的。
如何產生Perl隨機數
Perl利用函數rand()和srand()為Perl隨機數(更確切的說是“偽Perl隨機數”)字符串的生成提供了基本的工具。這些函數不是利用加密來提供安全性的,所以不要利用它們為你金融信息的加密。但是,如果你需要為你的下一個游戲或者動態Web網站的新特性設計一個簡單的Perl隨機數生成器,那么rand()和srand()可能就是你所需要的。
函數rand()是真正的Perl隨機數生成器,而srand()會設置供rand()使用的Perl隨機數種子。函數rand()會返回一個處于0和你所指定的數值(缺省為1)之間的分數。如果你在第一次調用rand()之前沒有調用srand(),那么系統會為你自動調用srand()。
要注意,使用同種子相同的數調用srand()會導致相同的Perl隨機數序列被生成。這在有的時候很方便,尤其在游戲編程里,你可能想要重復讓隨機事件按照精確的相同序列出現。
像下面這樣使用rand():
print"Yourluckynumberfortodayis:".int(rand(100)+1)."";
Perl隨機數指令:rand
語法:rand($interger)
說明:常和函數srand搭配來取得一Perl隨機數,如果沒有先宣告stand函數的話,則取出的常數值是一個固定值。這個語法會返回一個介于0和$interger之間的數值,如果$interger省略的話,則會返回一個介于0和1的數值。
示例:
srand;#要先宣告srand函數,才能產生Perl隨機數的效果
$int=rand(10);#$int的值會大于0而且小于10如果希望產生的亂數是整數的話,就要再加上int#這個函數
$int=int(rand(10));#$int的值是一個整數,且值在0和9之間
--------------------------
$int=rand(10);
$int=int(rand(10));
print"intis$int\n";
運行:
intis9
再次運行:
intis7
#可見rand取的是Perl隨機數字
【編輯推薦】