#         12345679012345678901234
perl6 -e 'say 1+[max]lines».chars'