从具有固定种子的文件中选择随机行（伪随机）

Question

我想从文件中随机选取一些行（例如20）并将其打印到另一个文件中但是我希望修复种子，以便在输入文件相同时获得相同的输出。

我发现选择几行的例子，它们的输出每次都不同 e.g：

perl -e '$f="inputfile";$_=`wc -l $f`;@l=split( );$r=int rand(@l[0]);system("head -n$r $f|tail -20")'> outputfile

那些谈论固定种子和伪随机的只是用于打印数字，不是从文件中提取行，或只是提取单行。是否有针对unix或perl或类似代码的命令？ （sort -R，--random-＆amp; shuf无效（使用Mac OS X 10.5.8））。

Answer 1

您可以通过srand（）设置种子; （例如.srand（5））获得rand的固定种子。