如何制作列表：：Util'；洗牌'；在Perl中复制相同的输出

是否可以利用Perl的shuffle，以便每次以相同的顺序生成输出？

使用

srand（）

函数时始终使用相同的种子值（

123

）。例如，我得到：

$ perl -MList::Util=shuffle -E 'srand 123; say shuffle 1 .. 5'
41352

---

每次都可以重复。如果没有调用，则会有所不同。

我认为在运行shuffle之前，每次使用相同的种子值调用srand（）就足够了。当然，shuffle的全部目的是生成一个随机顺序？我正在运行一些测试，需要得到相同的结果，以确保代码正常工作。这就是我需要它的原因。