Help for this page
my $k =25; my %readrepo =( ... "readB_2", "readC_1", "readD_2");
readA GCTGAGGCAGGAGAATTGCTTGAACCTGGGAGGCA readB TACTCAGGAGGCTGAGGCAGGAGAATTGCTTGAAC readC GCTGAGGCAGGAGAATTGCTTGAACTTAGGGGATG readD TACTCGGGAGGCTGAGGCAGGAGAATTGCTTGAAC
TACTC(A,G)GGAGGAGAATTGCTTGAACCTGGGAGGCA(T,C)T(A,G)GG(A,G)G(A,G)(T,C)(A +,G)