Perl:如何同时访问数组中的多个非连续元素？

Question

我想查询的数组在执行期间不会更改:

my @const_arr=qw( a b c d e f g);

输入是一个包含我想要访问的索引的字符串,例如:

my $str ="1,4";

是否有某些东西(除了迭代索引之外$str)沿着@subarray = @const_arr[$str]那条线 会导致@subarray包含[b,e] ？

Answer 1

如果索引在字符串中,您可以拆分字符串以获取它们:

@array    = qw(a b c d e);
$indices  = '1,4';
@subarray = @array[split /,/, $indices];
print "@subarray\n";