在Perl中，我怎么能封闭括号中的每个元素后加入一个数组中的元素？ [英] In Perl, how can I join elements of an array after enclosing each element in brackets?

问题描述

我试图加入一个Perl数组的元素。

I was trying to join elements of a Perl array.

@array=('a','b','c','d','e');
$string=join(']',@array);

会给我

$string="a]b]c]d]e";

反正我有可以迅速得到

Is there anyway I can quickly get

$string="[a][b][c][d][e]";

推荐答案

另一种方式来做到这一点，使用 的sprintf 。

Another way to do it, using sprintf.

my $str = sprintf '[%s]' x @array, @array;

这篇关于在Perl中，我怎么能封闭括号中的每个元素后加入一个数组中的元素？的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！