print OUT "$line\n"; autoflush OUT 1;