#         1234567901234567890123
    perl6 -e 'say 1+lines».chars.max'