5 lines
151 B
Raku
5 lines
151 B
Raku
my @anagrams = 'unixdict.txt'.IO.words.classify(*.comb.sort.join).values;
|
|
|
|
my $max = @anagrams».elems.max;
|
|
|
|
.put for @anagrams.grep(*.elems == $max);
|