我可以删除SetHash的元素并在Perl 6中使用它的值吗？

我想删除的任何元素SetHash，以便返回其值：

my SetHash $a;
$a<m n k> = 1..*;
my $elem = $a.mymethod;
say $elem; # n
say $a; # SetHash(m k)

我可以按照以下两个步骤进行操作。有没有更好的办法？

my $elem = $a.pick;
$a{$elem}--;

顺便说一句，是否有一种更惯用的方式将多个元素添加到SetHash？

以下是否更好？

my SetHash $a;
$a{$_}++ for <m n k>;

要么

my SetHash $a;
$a<m n k> X= True;