Select Code to Download

$seq="ACGGGAGGACGGGAAAATTACTACGGCATTAGC";
print "Initial seq is:\n".$seq."\n";
...

$reverse = reverse($complement);
print "Reverse complement is:\n".$reverse."\n";