Perl 编程/关键字/srand
Thesrand函数设置并返回用于rand运算符的随机数种子，以便它可以生成不同的随机数序列。
srand在rand调用时隐式调用，但可以显式调用以生成具有相同种子的随机数以进行测试目的（见下文）。
请不要在没有srand后跟EXPRESSION的情况下多次调用，因为随机数生成将失去随机性。
srand EXPRESSION
srand
srand($seed); # Creates random numbers with the same seed for test