I am new to perl.
I just inherited a perl script that has this
Code:
while ($input_sequence =~ /( (.)\2{7,} | (..)\3{3,} | (...)\4{3,} | (.{4,100})\5{2,} )/g)
Can any experts out there help me.
(input sequence contains a bunch of letters and number.
i.e.,
>gi|208965091|g b|ACI31834.1|...
Leave a comment: