<>;$l=-1+length$',$%=$`*.012,$a+=$l<$%?$l:($?+=$l-$%,$%)while<>=~/ /;print"$a $?"