Select Code to Download

#!usr/bin/perl 
print "\n\nPlease type the filename of the DNA sequence data: ";
$DNAfilename=<STDIN>;
...
print "\nA=$A; T=$T; G=$G; C=$C; Errors(N)=$e.\n.";
}
exit;