只需要数组字符串的一部分复制到另一个阵列

Question

这是我的源阵列：

my @raw_stack = (
    'a1~a2~a3~a4~a5', 
    'b1~b2~b3~b4~b5', 
    'c1~c2~c3~c4~c5', 
    'd1~d2~d3~d4~d5', 
    'e1~e2~e3~e4~e5', 
); 

我想获得“〜”模式的第3个值然后再将这个 到另一个阵列。

其他阵列现在应该是这样的：

my @other_stack = (
    'a3', 
    'b3', 
    'c3', 
    'd3', 
    'e3', 
); 

我能去通过堆叠阵列循环再拆
推到另一个阵列，但是我正在寻找一种方式精益
为此编码。

任何想法？

Answer 1

my @other_stack = map {(split/~/)[2]} @raw_stack; 

Answer 2

使用map列出改造，而不是push。如果项目是固定宽度，则使用index/substr或unpack。这通常比使用正则表达式的split更快。