$_=a.~<>;s/./qw(${ print+chr$ --$ -- ++$ ++ }while$)[ord($&)%26%8].'$i;'/ge;eval