Help for this page

Select Code to Download


  1. or download this
    if(/^>/) {$seq = $_} 
else {$accession{$seq} .= $_}
  2. or download this
    if($_ =~ />/) {
       $seq = $_;
} else {
       $accession{$seq} .= $_;
}