$<.map{|s|l,_,r=s.bytes (s[??]&&=$*[l+r-63].chr)?puts(s):$*[$*[l]=r]=l}