...
open OUT, ">", "outfile.name" or die "outfile.name: $!\n";
...
print OUT $DNA_conc;
# and so on...