/ .* /&&++${$b=$&-$'}[$`],$\+=$$b[!$`]for<>;print