Re^2: counting overlapping patterns

by ikegami (Patriarch)

on Feb 18, 2005 at 21:46 UTC ( [id://432532]=note: print w/replies, xml )

Need Help??

Alternatively,

while ('AAAA' =~ /A(?=A)/g) {
   $count++;
}
[download]

which looks slightly less weird to me.

Comment on Re^2: counting overlapping patterns Download Code

Replies are listed 'Best First'.
Re^3: counting overlapping patterns by Eimi Metamorphoumai (Deacon) on Feb 18, 2005 at 22:15 UTC
But requires rewriting the pattern. Mine will work even if the pattern comes from a variable, or contains different possibilities for the first character ('`/AA\|BB/`' becomes '`/(?=AA\|BB)/`'). My approach was to try to do minimal tinkering with the original, but yeah, it's not as obvious what's actually going on.	[reply] [d/l] [select]
Re^4: counting overlapping patterns by ikegami (Patriarch) on Feb 18, 2005 at 23:39 UTC
Good point.	[reply]

Domain Nodelet^?

Node Status^?

node history
Node Type: note [id://432532]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others taking refuge in the Monastery: (5)

As of 2024-04-25 14:00 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

No recent polls found