while (($read)=<IN>) {