perl中srand()与time的函数使用方法介绍(perl date)

在perl中srand（）提供供rand()使用的随机数种子，rand（）产生随机数生成器。如果在第一次调用rand()之前没有调用srand()，那么系统会为你自动调用srand()。使用同种子相同的数调用srand()会导致相同的随机数序列被生成。

举例如下：

得到的结果如下：F:>perla.pl 0. 0.

若果我们把第二个srand（）去掉，如下：

得到的结果如下：F:>perla.pl 0. . F:>

这样产生的两个数值就不一样了。

附带一个小程序，利用了一个子程序，随机输出了个随机数值，在这里利用了，srand（time|$$)，也就是每次都利给srand赋予新的种子，这样就保证得到的随机数就不一样，同样里面time函数获取当前的时间，因为时间是不同的，所以种子就不同，我们得到的随机数就不同。

我们就time的各个函数做出说明：print "time()=".time()."n";#从年到现在的秒数 print "localtime()=".localtime()."n";#当前时间 print "gmtime()=".gmtime()."n";#标准格林威治时间

输出结果如下：F:>perla.pl time()= localtime()=Mon Oct :: gmtime()=Mon Oct :: F:>

推荐整理分享perl中srand()与time的函数使用方法介绍(perl date)，希望有所帮助，仅作参考，欢迎阅读内容。

文章相关热门搜索词:perl 时间,perl stdout,perl时间函数,perl strict,perl date,perl中\s+,perl 时间,perl strftime,内容如对您有帮助，希望把文章链接给更多的朋友！

用perl实现生物突变的随机模拟程序代码 程序文件：test.pl#!/bin/perl#filename：test.plusestrict;usewarnings;#随便找一个比较好识别的序列my$DNA="AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAn";my$i;my$mutant;sr

perl 变量 $/ 的用法解析 上下文为行模式时，$/ 定义以什么来区分行 默认状态下，很显然都是用n来区分行，n也被我们称作为换行符。当读取序列时，按行来读取时，就是以换行符为标准。读取的strawberry1.gb的文件内容

perl写的一个随机编故事的程序(rand随机函数) #!/bin/perlusestrict;usewarnings;#定义变量my$count;my$input;my$number;my$sentence;my$story;#定义四个数组#定义了人物数组my@nouns=('Dad','TV','Mom','Groucho','Rebecca','Harpo','RobinHoo