<>;$/=$",$M+=$-=($%+=/R/?<>:-<>)-$M,$m-=$-=$m-$%for<>=~/./g;print$M-$m