http://www.perlmonks.org?node_id=681825


in reply to force regular expression to match every item only once

I'm not exactly sure what you want to achieve, but from what I read I would think you want matching pairs in $matcher instead of zero-length assertions, as in:

my $matcher = qr/(?:(@{[join "|", @pairs]}))/;

Which gives 3 matches instead of 5 (likewise for $dictword = "zeezze";.)

If I' completely wrong, please clean the syntax/stricture errors in your OP first.

Replies are listed 'Best First'.
Re^2: force regular expression to match every item only once
by hiddenOx (Novice) on Apr 21, 2008 at 02:42 UTC
    I've updated the code and the current one is compiling right, sorry but didn't have much sleep. The problem still exist actually as I want it when it when one pair get matched once, it can't get matched again so for the current one, it should give only score 2 (ze and ez gets matched once each) and not 4 where it match each pair twice.