Help for this page
if ( ($genome[$i] eq 'a') && ($genome[$i+1] eq 'a')) { ++$tt; } ... && ($genome[$i+1] eq 'a')) { ++$ta; } ...
my $genome = $genome[$i]; my $genome1 = $genome[$i+1]; ... && ($genome1 eq 'a')) { ++$ta; } ...
my $genomepair = $genome[$i] . $genome[$i+1]; ... elsif ( $genomepair eq 'ta') { ++$ta; } ...
www.com | www.net | www.org
No recent polls found