get;my&f={.[1..*]Z-.[0..*-2]};f(words)~~say 1+max f [-1,|f.grep(!!*,:k),$_-1]