s=""while""do c=io.read(1)c=c:find"%d"and s:sub(c+1,c+1)or c io.write(c)s=c:match"%w*"..s end