in reply to Implementing variable-width negative lookbehind assertions?

Here's a prime application of sexeger.
$rev_regex = regex2 qr{maet(?!\W+(\w+\W+){0,5}tnemeganam)};
Now execute it as such:
$results = $rev_regex->(scalar reverse $string);


japhy -- Perl and Regex Hacker