arrays - 如何在Perl 6中缩短数组？

Question

如何在Perl 6中切断数组或数组引用？

在Perl 5中，我可以这样做:

my $d = [0 .. 9];
$#$d = 4;

在Perl 6中，如果尝试以下操作，则会收到错误消息:

my $d = [0 .. 9];
$d.end = 4; # Cannot modify an immutable Int

这可以工作，但是它看起来不如Perl 5美观，并且可能很昂贵:

 $d.=splice(0, 5);

Answer 1

有一个简单的方法:

my $d = [0..9];

$d[5..*] :delete;

如果数组是一个无限的数组，那将是一个问题。
$d.splice(5)也有同样的问题。

在一般情况下，最好的选择可能是 $d = [ $d[^5] ]，在这种情况下，您可能对数组一无所知，并且需要一个可变数组。

如果您不需要它是可变的 $d = $d[^5]，则返回一个List可能会更好。