$\=0;/o/?$\+=$-=++$x-$\:($x=0)for(<>.<>)=~/./g;print