如何在Perl中打印包含随机元素的多行

我想使用Perl输出一个列表文件。在这个列表文件中，我需要有10000多行，比如

abc -s 1234 
abc -s 2345

上述陈述中的数字可能是随机的，但范围很广（比如说高达一百万）。我不想写10000行，有没有更简单的方法

我可以在这里使用for语句，但我不确定如何生成随机数以在语句中打印

Eg

对于（i=1；i您可以

for (1 .. 10000) {
  my $rand = int rand 10000;
  print "abc -s $rand\n";
}

或者使用一个班轮

perl -E 'say "abc -s ", int rand 10000 for 1..10000' > file.txt

你可以

for (1 .. 10000) {
  my $rand = int rand 10000;
  print "abc -s $rand\n";
}

或者使用一个班轮

perl -E 'say "abc -s ", int rand 10000 for 1..10000' > file.txt