raku - 从 Raku 中没有 (Any) 人工制品的列表或数组中删除一个元素

Question

我搜索了 Raku 文档、几本书和教程以及几篇 Stackoverflow 帖子，以了解如何干净地从列表/数组中删除项目，即没有 (任意)代替被删除的元素

my @s = <3 18 4 8 92 14 30>;
my $item = 8; 
my $index =  @s.first($item, :k);
@s[$index]:delete;

这导致 [3 18 4(任意)92 14 30] 所以我不能对它做任何操作，例如我不能申请 [+]在上面。

有没有办法从列表/数组中删除一个项目而没有 (任意) ?

Answer 1

是的。使用 splice方法:

my @s = <3 18 4 8 92 14 30>;
my $item = 8; 
my $index =  @s.first($item, :k);
@s.splice($index,1);
say @s;  # [3 18 4 92 14 30]

或者您可以使用 Adverb::Eject模块，因此您可以将以上内容编写为:

use Adverb::Eject;
my @s = <3 18 4 8 92 14 30>;
my $item = 8; 
my $index =  @s.first($item, :k);
@s[$index]:eject;
say @s;  # [3 18 4 92 14 30]