1until case getc when 32 1when 10 1 end while putc getc