RosettaCodeData/Task/Ordered-words/Perl-6/ordered-words.pl6
2016-12-05 22:15:40 +01:00

1 line
66 B
Raku

say lines.grep({ [le] .comb }).classify(*.chars).max(*.key).value