Perl生成隨機數實現代碼，Perl利用函數rand()和srand()為隨機數（更確切的說是"偽隨機數"）字符串的生成提供了基本的工具。這些函數不是利用加密來提供安 全性的，所以不要利用它們為你金融信息的加密。但是，如果你需要為你的下一個游戲或者動態Web網站的新特性設計一個簡單的隨機數生成器，那么 rand()和srand()可能就是你所需要的。

函數rand()是真正的隨機數生成器，而srand()會設置供rand()使用的隨機數種子。函數rand()會返回一個處于0和你所指定的數 值（缺省為1）之間的分數。如果你在第一次調用rand()之前沒有調用srand()，那么系統會為你自動調用srand()。

要注意，使用同種子相同的數調用srand()會導致相同的隨機數序列被生成。這在有的時候很方便，尤其在游戲編程里，你可能想要重復讓隨機事件按照精確的相同序列出現。

像下面這樣使用rand()：

print "Your lucky number for today is: " . int(rand(100) + 1) . " ";
指令：rand
語法：rand($interger)
說明：常和函數srand搭配來取得一隨機數，如果沒有先宣告stand函數的話，則取出的常數值是一個固定值。這個語法會返回一個介于0和$interger之間的數值，如果$interger省略的話，則會返回一個介于0和1 的數值。

示例：
srand; #要先宣告srand函數，才能產生隨機數的效果
$int=rand(10); #$int的值會大于0而且小于10如果希望產生的亂數是整數的話，就要再加上int #這個函數
$int=int(rand(10)); #$int的值是一個整數，且值在0和9之間
————————–
$int=rand(10);
$int=int(rand(10));
print "int is $int/n";

運行：

int is 9
再次運行：
int is 7
#可見rand取的是隨機數字

實例：我有一個7000行的文本數據，想每次從中隨機提取1280行，提取100次，最后生成100個1280行的文本，該如何做？各位請指點。

?

以上就是Perl生成隨機數實現代碼，如果大家想了解更多相關內容，請持續關注本站，本站小編將在第一時間為大家帶來更好的經典內容。