$_=<>;<>=~/.$/;print-1+eval"1023&1+grep s/$`$&/$&/,(\$_)x1023"