open($CONFLICTS, '+>', "data.txt") or die $!; print $CONFLICTS "@data";