<>=~s#|.#$a[2*y!!!+$|--]=$_=$'^reverse$`#ger;print$#a