perl 产生随机数

用perl产生随机数

#无参数，返回一个介于0和1之间的值
$num=rand();
#(0,10)的数,大于0而小于10
$num=rand(10);
#[0,9]产生一个0到9的整数
$num=int(rand(10));
for($i=0;$i<20;$i++){
	$num=int(rand(10));
	print $num."\n";
}

输出结果：

产生1到10之间的随机数[1,10]

$num=int(rand(10))+1;