3218258 ^
1 2 3 4 5
unit module WordCount; sub count-words (Str $sentence) is export { $sentence.lc.comb(/\w+\'\w+|\w+/).Bag; }