loop{putc$.=C if$.<=C=getc}