raku有什么更好的方法来从尾部做转子？

# 创建一个列表
my @list = 1, 2, 3, 4, 5;

# 使用负数索引访问最后一个元素
my $last-element = @list[-1];
say "最后一个元素是: $last-element";  # 输出: 最后一个元素是: 5

# 使用负数索引访问倒数第二个元素
my $second-last-element = @list[-2];
say "倒数第二个元素是: $second-last-element";  # 输出: 倒数第二个元素是: 4

# 使用切片从尾部获取多个元素
my @tail-elements = @list[-3 .. *];
say "最后三个元素是: @tail-elements";  # 输出: 最后三个元素是: 3 4 5

# 使用reverse方法反转列表
my @reversed-list = @list.reverse;
say "反转后的列表是: @reversed-list";  # 输出: 反转后的列表是: 5 4 3 2 1

# 错误示例
my @short-list = 1, 2;
my $element = @short-list[-3];  # 索引越界错误

# 正确示例
my $element = @short-list[-2];  # 正确访问倒数第二个元素

# 使用迭代器处理尾部元素
my @large-list = 1 .. 1000000;
for @large-list.reverse -> $element {
    say $element;
    last if $element <= 999997;  # 处理最后三个元素
}