perl - 在 perl 中多次打印同一行

Question

我想在一行中输出，现在很好，例如:

print "$a\t" x 99;
print "$b\n";

所以上面是一行的样子。但我也想打印这些行 $c次。有没有捷径可以做到这一点，而不是使用 for 循环，例如:

for ($i = 1; $i <= $c; $i++) {
  print "$a\t" x 99;
  print "$b\n";
}

有没有更简单的方法可以做到这一点，就像 "$a\t" x 99 ?

Answer 1

for (1 .. $how_many) { print "$foo\t" x 99, "$bar\n"; }

IMO 比 C 风格的 (;;) 循环更简单。