Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Re: Substitute _last_ occurence in string?

by PrakashK (Pilgrim)
on Jul 25, 2001 at 18:40 UTC ( #99692=note: print w/ replies, xml ) Need Help??

in reply to Substitute _last_ occurence in string?

s/(two )(?!.*two )//
Probably valid only perl 5.6.0 +. Update: Above works only if two is followed by a space. It fails if:
$string = "one two three two four two";
The following works. Also, the parentheses around the first two are unnecessary.
$string =~ s/two\s*(?!.*two)//

Comment on Re: Substitute _last_ occurence in string?
Select or Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://99692]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (11)
As of 2015-07-31 17:30 GMT
Find Nodes?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...

    Results (279 votes), past polls