if ($windowSeq =~ /GG$/) { $sequences{$windowSeq}{Count}++; $sequences{$windowSeq}{Position} = $windowStart; } #### if ($windowSeq =~ /GG$/) { $windowStart += $windowSize; } else { $windowStart += $stepSize; }