具有重复子串的 Perl 重复串

Ima*_*ngh 2 perl

我正在尝试fbeq00000000000000000000在终端中使用 perl打印一个字符串。

为了避免输入太多我正在使用的零

 perl -e 'print "fbeq" . "0" x 20'
Run Code Online (Sandbox Code Playgroud)

现在,我想打印fbeq0000000000000000000020 次,我想用它来实现

 perl -e 'print "fbeq" . "0" x 20 x 20'
Run Code Online (Sandbox Code Playgroud)

这给了我不正确的输出: fbeq0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000

我想要的是

fbeq00000000000000000000fbeq00000000000000000000fbeq00000000000000000000fbeq00000000000000000000fbeq00000000000000000000 ....

我如何做到这一点?

编辑:我试过: perl -e 'print ("fbeq" . "0" x 20) x 20'结果不正确。

hat*_*ata 5

您可以使用括号:

perl -e 'print(("fbeq" . "0" x 20) x 20)'
Run Code Online (Sandbox Code Playgroud)

  • @skrrrt 其他尝试的问题在 [operators - Why is 'print (52-80)*42' different from 'print 42*(52-80)' in Perl? 中解释。- 堆栈溢出](/sf/ask/266445791/ Different-than-print-4252-80-in-perl) (2认同)