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