http://qs321.pair.com?node_id=390077


in reply to On zero-width negative lookahead assertions

there are two errors in the code:

You are searching the match and Perl find it for you looking through all possible combinations