open (DATA, "+>$outfile");