arrays - 如何在 Perl 中获取引用数组的一部分？

Question

我有一个对数组的引用$arr_ref。我想获得对仅包含i..j原始数组中单元格的数组的引用。

Answer 1

@slice = @{$arr_ref}[$i..$j];

Answer 2

my $r = [0..9];    
print $_, "\n" for @$r[3..5];

如果包含引用的变量比普通标量更复杂，请将其括在大括号中。这是必需的，因为取消引用发生在下标查找之前：

my @refs = ( [0..9], [100..109] );
print $_, "\n" for @{ $refs[1] }[4..8];

Answer 3

@rainbow = ("red", "green", "blue", "yellow", "orange", "violet", "indigo");
$arr_ref = \@rainbow;
$i = 1;
$j = 3;
@slice = @$arr_ref[$i..$j]; # @slice is now green blue yellow