请教如何用perl 在任意范围内产生随机数

justu78

rand只能在0和某一个整数之间产生随机数。但是如果我想要在任意范围内产生随机数产生随机数（有正有负），比如-0.1到0.03之间产生若干随机数，请问该如何处理呢？谢谢

jzp520520

回复 1# justu78
$a=rand(0.13)-0.1;
http://hi.baidu.com/litto/item/7c9cdb0cb890e78a02ce1ba1

To generate a random number between, for example, 100 and 150, simply work out the range and add the minimum value to your random number.

#!/usr/bin/perl
use strict;
use warnings;

my $range = 50;
my $minimum = 100;

my $random_number = int(rand($range)) + $minimum;

print $random_number . "\n";
   

substr函数

1. sub Rand { rand( $_[1] - $_[0] ) + $_[0] }
   
2. say Rand(-1, 1);

复制代码

justu78

jzp520520 发表于 2014-01-08 20:56
回复 1# justu78
$a=rand(0.13)-0.1;
http://hi.baidu.com/litto/item/7c9cdb0cb890e78a02ce1ba1

thanks a lot

justu78

substr函数 发表于 2014-01-08 20:59

多谢了：）

substr函数

回复 5# justu78

不客气.