$\=<>;++$d{$_+1},$\+=$d{$_+2}=$d{$_}for sort{$a>$b}glob<>;print