Thread Ermitteln und ausgeben von Positionen innerhalb eines Strings
(5 answers)
Opened by Sev at 2010-10-27 09:33
Bei festen Trenner kann man schreiben:
Code (perl): (dl
)
1 2 3 4 5 6 7 8 my $line = "DIQMTQSPSSLSASVGDRVTITCXXXXXXXXXXXWYQQKPGKAPKXXXXXXXXXXXGVPSRFSGSGSGTDFTLTISSLQPEDFATYYCXXXXXXXXTFGQGTKVEIK"; my $pos=0; while(my $pos_in=index($line,'XXXXXXXXXXX',$pos)>-1) { print "feature $pos..$pos_in\n"; $pos=$pos_in+11; } print "feature $pos..".length($line)."\n" if($pos<length($line)); Das ist bei großen Strings spürbar schneller. |