((!get+get.words[1]XR=>get.words)xx get).Bag.sort({-.value,.key})[^10]>>.&{$_&&.put}