random - 如何在Perl 6中获得随机选择的哈希键？

Question

一个快速且希望很简单的问题:

我需要从给定的一组哈希键中随机选择的方法。关于rand和Hash的perl6.org文档都没有提供很多提示。

my %a = 1,2,3,4,5,6;

鉴于以上情况，

%a.keys;

返回 (5 1 3)，如果我只是尝试

%a.rand;

我得到的是伪随机浮点数，而不是任何一个 key 。

我最终将鹅卵石拼凑成 %a.keys[Int(%a.elems.rand)]，但是希望有更简单的东西。

Answer 1

使用 pick 或 roll ，例如

%a.keys.pick