1
2
3
4
dog
1
2
3
4
5
puppy
7
8
I want to replace dog with puppy. Sometimes I want preserve lines between them too sometimes and wan't to remove the lines other times.
While using this one liner
perl -i.bak -pe "BEGIN{undef $/;} s/(dog)((.*[\r\n]+){6})(.*)/$1/smg" 4.txt it gives1
2
3
4
dog
while notepad pcre gives desired result wile using find (dog)((.*[\r\n]+){6})(.*) and replace with \1
1
2
3
4
7
dog
8
like wise when I replace it with \2 it gave all the lines without dog and puppy. and while \3 gave me puppy in place of dog in above mentioned result. all behaves perfectly.
So the main thing that I want is to make grouping as follow. group 1= dog, Group 2 = 6 lines after found string i.e.dog. group 3 = whatever present on line 7. I want to be able to put back the groups as required.
Questions un answered
How to use grouping in perl while using regex that matches new line? Am I using rightly grouping in perl in my above code?
How to specify substitution? does substitution formula is correct as a whole in my code?
How to specified remembered groups? Am I making any mistake in substitution position while specifying group like $1, $2, $3 or sometimes $& (what is found)
I don't have sufficient knowledge to understand what you have suggested so I tried
perl -i.bak -pe "BEGIN{undef $/;} s/(dog)(.*([^\n]*\r?\n){6})(.*)/$1/smg" 4.txtgave same results as with earlier oneliner
In reply to Re^4: Regex find and replace involving new line
by PRA007
in thread Regex find and replace involving new line
by PRA007
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |