String 如何通过每次替换一个字符将字符串重复N次?

String 如何通过每次替换一个字符将字符串重复N次?,string,perl,String,Perl,我可以用这个语句重复一个字符串 print "(","arr[0],"x35,")"; 它打印(arr[0],arr[0],…,arr[0],) 但如何获得如下输出 (arr[0],arr[1],...,arr[34]) i、 e;每次打印字符串时,它都应该在循环中用0,1,2,…,34替换0,或者您希望避免在循环中使用循环,还是希望避免使用循环?太好了!!正是我想要的。谢谢,太好了!!正是我想要的。非常感谢。 print '(', join(',', map { "arr[$_]" } 0

我可以用这个语句重复一个字符串

print "(","arr[0],"x35,")";
它打印
(arr[0],arr[0],…,arr[0],)

但如何获得如下输出

(arr[0],arr[1],...,arr[34])

i、 e;每次打印字符串时,它都应该在循环中用0,1,2,…,34替换0,或者您希望避免在循环中使用循环,还是希望避免使用循环?太好了!!正是我想要的。谢谢,太好了!!正是我想要的。非常感谢。
print '(', join(',', map { "arr[$_]" } 0..34), ')', "\n";