The stupid question is the question not asked | |
PerlMonks |
Re^2: Dera Monks, Have create multiple file from one file now I want to match a pattern in each file at the same time do the replacement with adding one to the match pattern.by pvaldes (Chaplain) |
on Jan 01, 2015 at 20:12 UTC ( [id://1111924]=note: print w/replies, xml ) | Need Help?? |
If I'm not wrong the question is: how to do a global substitution of a pattern over several files replacing the pattern by $counter and also updating $counter as $counter+1 each time a substitution is done. I have some doubts about this lines
You search for a big number, then discard the first ten digits, capture next digits and replace it by $1+$n in an eval (e) context when $n is a counter. Ok. The use of \K here also confuses me a little. Can't see the point of doing this here when you aren't really picking up those digits when \K is reached Perl throws away everything that it has matched up to that point. It means that our replacement won’t affect anything before the \K, because Perl will have forgotten about it I wonder if you want to say $n++ or $n += 1 instead ++$n
In Section
Seekers of Perl Wisdom
|
|