say flat($!=!get,map {$!+=$^a-$^b},words).max*2-$!