- or download this
#!usr/bin/perl
use strict;
...
$ perl bio.pl sequence.fa
23
- or download this
$ cat sequence.fa | grep -bo ATG
16:ATG
...
1272:ATG
tinyos@tinyOMN:~/Monks$ cat sequence.fa | grep -bo ATG | wc -l
24
- or download this
#!usr/bin/perl
use say;
...
# print Dumper \@AoH;
# print Dumper \%HoH;