$input=<>.<>; @days=map {length($_)} split($input,/o+/); print max(@days);