in reply to
The previous reply from allolex offers some very good advice on how to approach this problem. In addition to the direction offered in that reply, you may want to have a look at the Perlfect search engine which is written in Perl and implements a very basic stem indexing method.
There has previously been a discussion on stemming from the perspective of stemming errors at Natural Language Index Stemming.
perl -le 'print+unpack("N",pack("B32","00000000000000000000001000111001"))'