Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked

Answer: How do I find the Nth occurrence of a pattern?

by Roy Johnson (Monsignor)
on Oct 28, 2003 at 20:53 UTC ( #302814=categorized answer: print w/replies, xml ) Need Help??

Q&A > regular expressions > How do I find the Nth occurrence of a pattern? - Answer contributed by Roy Johnson

A recent discussion found this to be the fastest way, and it's pretty slick:
$_='abcabbcabbbbcabcabbcab'; my $n = 3; ## Find the $nth occurrence my $pat = qr/ab+/; ## of this pattern my ($NthMatch) = /(?:.*?($pat)){$n}/; print "Match #$n looks like $NthMatch\n";
The regex is: find the pattern (optionally preceded by something that isn't the pattern) n times. The pattern is in parens, so the final match will be returned.

Log In?

What's my password?
Create A New User
and a soft breeze sighs...

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (3)
As of 2017-06-27 11:27 GMT
Find Nodes?
    Voting Booth?
    How many monitors do you use while coding?

    Results (604 votes). Check out past polls.