$_=<>;/((.)(?1)\2|.?)(?{$a+=$-=-$a+length$1if"$1
"ne$_})^$/;print$a