Persistence

multi persistence(UInt $_) {
    persistence .comb
}
multi persistence(@v where .elems > 1) {
    1 + persistence [*] @v
}
multi persistence([$]) {
    0
}

say persistence 5428;
say persistence 237