Re: How can I expand my substring?

In your example, what is your expected result?

Also, do the strings need to be as long as you've shown? This makes reading your example quite unwieldly. Maybe shortening each group of characters to four characters helps make the example data more understandable?

Personally, I would solve the problem exactly as you described. Replace any - followed by a B by BB, and the same for the other direction. Keep doing that as long as you can:

$string1='--NN--NNN--NN--NNN--BBB-----';

1
    while $string1 =~ s/B-/BB/ or $string1 =~ s/-B/BB/;

print $string1;
[download]

Comment on Re: How can I expand my substring? Select or Download Code

Replies are listed 'Best First'.
Re^2: How can I expand my substring? by Anonymous Monk on Jun 30, 2014 at 12:00 UTC
`$string1='--------NNNNNNN--------NNNNN--------NNNNN------NNNNNNN------ +-------BBBBB-----';` [download] should become `$string1_new='--------NNNNNNN--------NNNNN--------NNNNN------NNNNNNNBB +BBBBBBBBBBBBBBBBBBBBB';` [download] `$string2='---------NNNNN-NNNNNNNNNNNNN----NNNNNNNNNNN---------BBBBBBBB +BB';` [download] should become `$string2_new='---------NNNNN-NNNNNNNNNNNNN----NNNNNNNNNNNBBBBBBBBBBBBB +BBBBBB';` [download] `$string3='-------NNNNNNN-----------------BBBBBBBBBBBBBBB-------------N +NNNNNN';` [download] should become `$string3_new='-------NNNNNNNBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB +BBBNNNNNNN';` [download] `$string4='--------BBBBBBBBBBBB-------NNNNNNNNNNNNN------NNNNNN';` [download] should become: `$string4_new='--------BBBBBBBBBBBBBBBBBBBNNNNNNNNNNNNN------NNNNNN';` [download] Does this make more sense? Thank you for the answer, I just don't get this "1" that you have there... I tried the: `$initial_protein=~s/B-/BB/g; $initial_protein=~s/-B/BB/g;` [download] but didn't work...	[reply] [d/l] [select]
Re^3: How can I expand my substring? by Corion (Patriarch) on Jun 30, 2014 at 12:02 UTC
The "1" has significance, in the sense that it is the loop body. You could rewrite my code as: `while( $string1 =~ s/B-/BB/ or $string1 =~ s/-B/BB/ ) { # Replacement already happened in the while condition };` [download] There are other ways, but I find this approach to be closest to your description.	[reply] [d/l]
Re^4: How can I expand my substring? by Anonymous Monk on Jun 30, 2014 at 12:10 UTC
Oups, I think it misses case 4 or not? I mean, if the string starts with --- and doesn't have any NNNN before the BBB, then the BBB should be expanded only to the right (if there is space).	[reply]
Re^5: How can I expand my substring? by Corion (Patriarch) on Jun 30, 2014 at 12:17 UTC
Re^6: How can I expand my substring? by Anonymous Monk on Jun 30, 2014 at 12:24 UTC
Some notes below your chosen depth have not been shown here
Re^6: How can I expand my substring? by Anonymous Monk on Jul 22, 2014 at 13:04 UTC
Some notes below your chosen depth have not been shown here
Re^4: How can I expand my substring? by Anonymous Monk on Jun 30, 2014 at 12:07 UTC
Thanks Corion! Works smoothly!	[reply]