Isn't it possible to modify the code automatically (with another perl program)? You may have to create some regex, but with proper testing, your code would be ready for next generation.

Update (May 6):: Actually if you give all the scenes with represents those operators, we may help you to build the regex.