Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
    $data{$species}{morph} ||= '?' x $morphLen;
    print "$species: $data{$species}{dna}$data{$species}{morph}\n";
}
  2. or download this
    species_1: ACCATGATACGATG001001010201001001
species_2: GGTTTCGACGCAGA002010200210120201
species_3: GGACTCAGCGACTA??????????????????
species_4: ??????????????001001110000000101
species_5: ??????????????111001001001000201