PS, you might want to look at the Perl port of Lucene: http://search.cpan.org/~strytoast/Plucene-1.0/. All you would need to do is come up with an Analyzer that runs the transformation rules. We've had good experiences with the original Java Lucene, but I don't know whether the Perl version does as well..
 
Peter