perl - 如何在 Perl 中的两个数字之间创建一个随机数

Question

我已经在其他编程语言中看到了许多其他方法来做到这一点......虽然我还没有在 Perl 中找到一个......
我想要完成的是设置两个数字:

$minimum = 100;
$maximum = 4000;

然后在这两者之间创建一个随机整数。 (完整的号码)
($random_num)
我查看了这个网站:http://perlmeme.org/howtos/perlfunc/rand_function.html
这是一个很好的资源，虽然不完全是这样。

Answer 1

my $x = $minimum + int(rand($maximum - $minimum));

http://perldoc.perl.org/functions/rand.html

请注意，此范围不包括 $maximum本身。添加 1 以使其包含在内。