s=getc;loop{e=getc;0until e==s+=e<=>putc(s)}