是否有类似于Python中Counter的内置方法？

Question

我已经浏览了文档，但是似乎找不到与Python中的Counter类似的东西。

我知道我可以简单地编写类似的东西，但是内置函数会很方便。

典型例子： my %h; %h{$_}++ for @test;

Answer 1

Queue类可以满足您的要求。

my %h is Bag = @test;

或者，如果您只想胁迫：

my $bag = @test.Bag;

在任何一种情况下，您都可以像使用任何普通的Hash一样使用该对象。

# show sorted with most frequent first
say "{.key} seen {.value} times" for %h.sort: -*.value