Select Code to Download

 
my $ii=1;                        for(my $k=1;$k<$lt;$k++){
    if ($k == $loc[$ii]){ 
    print "<span style=background-color:red;>" .$text[$k] . "</span>";
                                $ii++; }
                        }

<r>length of gene sequence array 66
0 1 2 3 4 5 14 15 16 17 18 32 33 34 35 36 37 48 49 50 51 52 60 61 62 6
+3 64 65
...
< r>length of gene sequence array 66 
0 1 2 3 4 5 14 15 16 17 18 32 33 34 35 36 37 48 49 50 51 52 60 61 62 6
+3 64 65
GAATTCCCWGGGAATTCCCWGGGAATTC