For perl based spam protection try ASSP. It can probably do what you want already with very little work. Not to mention it's very very good :) http://assp.sourceforge.net/