当前位置: 首页>>代码示例 >>用法及示例精选 >>正文


Perl rand()用法及代码示例


Perl中的rand()函数返回一个介于0和传递给它的正数之间的随机小数,如果未指定任何值,则返回1。除非已经被调用,否则自动调用srand()为随机数生成器提供种子。

用法: rand(range_value)

参数:
range_value:指定范围的正数


返回值:
介于0和指定值之间的随机浮点数

示例1:

#!/usr/bin/perl -w 
  
# Calling the rand function 
$random = rand(15); 
  
# print the random number 
# between 0 and 15 
print("Random Number between 0 and 15: ", 
                          $random, "\n");

输出:

Random Number between 0 and 15: 12.6694798049858


示例2:

#!/usr/bin/perl -w 
  
# Calling the rand function 
# with negative value 
$random = rand(-25); 
  
# print the random number 
# between 0 and -25 
print("Random Number between 0 and -25: ",  
                           $random, "\n");

输出:

Random Number between 0 and -25: -7.54296459674615


相关用法


注:本文由纯净天空筛选整理自Code_Mech大神的英文原创作品 Perl | rand() Function。非经特殊声明,原始代码版权归原作者所有,本译文未经允许或授权,请勿转载或复制。