Hallo,

ich bin leider nicht sonderlich vertraut mit Perl, muss aber aufgrund technischer Einschränkungen ein kleines Perl-Skript basteln um Strings die zeilenweise in einer Textdatei enthalten sind zu transformieren. Ein Quellstring liegt bspw. in folgendem Format vor:

DIQMTQSPSSLSASVGDRVTITCXXXXXXXXXXXWYQQKPGKAPKXXXXXXXXXXXGVPSRFSGSGSGTDFTLTISSLQPEDFATYYCXXXXXXXXTFGQGTKVEIK

Daraus sollen die Positionen der einzelnen Abschnitte, die jeweils durch ein X getrennt sind gelesen werden. Der String oben beinhaltet demnach die folgenden Positionen und Abschnitte:

Pos. 1-23 DIQMTQSPSSLSASVGDRVTITC
Pos. 24-34 XXXXXXXXXXX
Pos. 35-45 WYQQKPGKAPK
Pos. 46-56 XXXXXXXXXXX
Pos. 57-88 GVPSRFSGSGSGTDFTLTISSLQPEDFATYYC
Pos. 89-96 XXXXXXXX
Pos. 97-107 TFGQGTKVEIK

Ziel ist, die gefundenen Positionen, die je nach Quellstring unterschiedlich sein können, als Liste am Ende auszugeben, bspw. so:

feature 1..23
feature 24..34
feature 35..45
feature 46..56
feature 57..88
feature 89..96
feature 97..107

Mein Problem ist, dass ich trotz stundenlanger Suche und herumprobierens (Trial & Error) der Lösung noch kein Stück näher gekommen bin. Jetzt hoffe ich, dass mir jemand bei diesem Problem weiterhelfen kann.

Vielen lieben Dank im Voraus!
Last edited: 2010-10-27 09:36:43 +0200 (CEST)