$rev_regex = regex2 qr{maet(?!\W+(\w+\W+){0,5}tnemeganam)};

##</code><code>##

$results = $rev_regex->(scalar reverse $string);