Help for this page
$ time perl ../ex_pattern_matching.pl <GGCGATGGCGTTCTAGCGCGTAAAA> ... real 0m37.721s user 0m37.656s sys 0m0.015s
#!env perl # ... "ovr" => sub { return ovr($long, 0) }, "poz" => sub { return poz($long, 0) }, });