在 Perl 中，数组索引-1 表示最后一个元素：
@F=(1,2,3);
print $F[-1]; # result: 3
您也可以改用$# 表示法，这里是$#F：
@F=(1,2,3);
print $F[$#F]; # result: 3
那么，当我想指定范围内的最后一个元素时，为什么-1 和$#F 不给出相同的结果：
print @F[1..$#F]; # 23
print @F[1..-1]; # <empty>
数组@F[1..-1] 应该真的包含从元素1 到最后一个元素的所有元素，不是吗？
【问题讨论】：
标签： perl arrays syntax notation
您的问题是@a[b..c] 语法涉及两个不同的操作。首先评估b..c，返回一个列表，然后使用该列表评估@a[]。范围运算符.. 不知道它被用于数组下标，因此就它而言，1 和-1 之间没有任何内容。它返回空列表，因此数组返回一个空切片。
【讨论】：
数组切片中的 .. 没有什么特别之处；它只是生成请求的范围，然后查找该范围的切片。
所以@a[-3..-1] => @a[-3,-2,-1] 和@a[1..3] => @a[1,2,3]，但是@a[1..-1] 变成了@a[()]。
【讨论】：
print join ', ', 1..$#F; # 1, 2, 3, 4, 5, 6, ...
print join ', ', 1..-1; #
原因是'..' 运算符在数组下标内部没有做任何特殊的事情。
在列表上下文中，它返回从左值到右值计数（递增）的值列表。如果左值大于右值，则返回空列表。
$#F是最后一个元素的索引，等于长度减一'@F -1'。 (如果长度至少为一。)
$F[-1] 只是一个特例，可以更方便地从另一端获取元素，而无需手动计算位置。
$F[-1] === $F[ @F -1 ] === $F[ $#F ]
@F[ 1 .. (@F -1) ] === @F[ 1 .. $#F ]
@F[ 1 .. (@F -2) ] === @F[ 1 .. ( $#F -1 ) ]
了解这一点后，您可以在范围运算符中使用变量：
use strict;
use warnings;
use feature 'say';
sub list{
my($arr,$first,$last) = @_;
$first = @$arr + $first if $first < 0;
$last = @$arr + $last if $last < 0;
return @$arr[ $first .. $last ];
}
my @F = 1..3;
say join ', ', list(\@F,1,-1)
注意：这是一个不完整的示例，它在某些极端情况下无法正常工作
【讨论】：
$#F 是 F 的最后一个有效索引，而不是元素的数量。
@F = (1,2,3); # 所以 $#F 是 2
【讨论】：
规则是：
$[），则从数组的开头开始计数现在，就像集合 (a,b) 是空的，如果 a > b，集合 1 .. -1 也是空的。因此，
@a[ empty set ]
对应一个空数组切片。
【讨论】：
[] 运算符将接受单个索引或范围。
-1 被接受为索引，表示最后一个元素的索引。正确的方法是 $#F。
1..-1 的范围是空的，这就是它不返回任何内容的原因，因为范围评估与索引的评估是分开的。
【讨论】：