One answer would be "yes."
Of course, that's not very helpful (minimally helpful, yes, but not "very helpful).
Another answer would be "yes, many ways (c.f. TIMTOWTDI).But that's not a lot better than the first... except -- perhaps -- that it hints at the notion of exploring documentation (starting, perhaps with perldoc perldoc and moving on to the various regex related items perldoc perlretut and Tutorials (here and elsewhere).
If you're very new to Perl though, a few hints on where to look for your answer may be invaluable (as they were for me, not so many years ago):
The simplest to grok (but not the best or more efficient) might be to consider using a regex to capture every instance of "example" and every instance of words NOT eq "example" to an array; then foreach your way thru that, testing for "example" and appending the value of an incrementing $i before printing the array element.
A better way would be to search the (documentation, nodes, books at your disposal) for how to make a regex treat some part thereof as code; that is, to perldoc -f eval an expression.
And, since it seems to need to be said, please read On asking for help with emphasis on the Monastery's view that SOPW should demonstrate your effort so far.
In reply to Re: Incremental replacement by regex
by ww
in thread Incremental replacement by regex
by markdibley
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |