Help for this page
use strict; use warnings; ... $Data::Dumper::Sortkeys = 1; print Dumper \%count;
use strict; use warnings; ... } print $A1, $A2, $A3, $T1, $T2, $T3, $C1, $C2, $C3, $G1, $G2, $G3;