perl rand函数详解

rand()函数用来生成随机数序列，用法如下：

rand EXPR
rand

rand()函数产生一个伪随机的浮点数数字，该数字大于等于 0 而小于 EXPR 的值。（EXPR 应该是正。）如果省略了 EXPR，该函数返回一个在 0 和 1 之间的浮点数（包括 0，但是不包括 1）。
要获取一个整数值，可以把它和 int 组合在一起，比如：

My $roll = int(rand 6);      # $roll 现在是一个介于 0 和 6 之间的数字

如果要指定一个区间，则在表达式后面加上你的左值即可：

My $roll = int(rand 6) + 1;      # $roll 现在是一个介于 1 和 6 之间的数字

rand()生成随机数时会首先调用srand()生成随机数种子，如果使用的随机数种子不变，那么使用rand()函数生成的随机数序列就会相同，且使用rand()函数不能保证生成的数值的分布质量。