Select Code to Download

sub revdnacomp {
  # my $dna = @_;  
...
  $revcomp =~ tr/ACGTacgt/TGCAtgca/;
  return $revcomp;
}

sub revcompl { # operates on all elements passed in
  my (@dna) = @_;
...
  }
  return @done; # or reverse @done;  # what's best semantics?
}