I'm not going to spend more than a moment on this but how about using conditional regex expressions ala:

print "String 'monkey' was ";
<>=~/(?(?:monkey)(?!)|(?{print "not "}))/
print "found in the input string\n";
[download]

Seeking Green geeks in Minnesota