Select Code to Download

#! perl -slw
use strict;
...
    }
    ++$o;
}

C:\test>1070240.pl
Found 'GT'(0:2) at 53
...
Found 'DNL'(28:3) at 419
Found 'NKRMGDLRDINGEAGTWVRLLNGSGSADGGFTDHYTLLQMGADRKHELGSMDLFTGVMATYTD
+TDASADLYSGKTKSWGGGFYASGLFRSGAYFDVIAKYIHNENKYDLNFAGAGKQNFRSHSLYAGAEVGY
+RYHLTDTTFVEPQAELVWGRLQGQTFNWNDSGMDVSMRRNSVNPLVGRTGVVSGKTFSGKDWSLTARAG
+LHYEFDLTDSADVHLKDAAGEHQINGRKDSRMLYGVGLNARFGDNTRLGLEVERSAFGKYNTDDAINAN
+IRYSF'(31:275) at 1103
Found 'LE'(306:2) at 322