my $seq = "CTTCGAATT"; # in this case length of 9