Select Code to Download

Select or download this

#!/usr/bin/perl -w

...
  return $rawseq;

}

Select or download this

 01 aagaagaagf agaagaagag agagaacttg gaaacagaat tgtagaacag atttatagac
 61 agagcaaagt acaattccgt ttcagacaag taacaagagt gaaatagata taagactcag
...
481 atcaagcatc tggaagcaaa cgagtactcc ttagcatatc gaaccaactc catctaccac
541 tccccaaaca aacacatact tgacacaggc agtctHEREa gggtagggtt tcgataccga
601 gcgattccat gcgatgctgc tgctcctcgt agaagtactc cagctcgtac atcgagagga