$newfile = $ARGV, close(ARGV), last if /^"$commonField"$/;