As mentioned in LISP translation help??, Paul Graham wrote an interesting article about blocking spam, implemented in LISP.
Gary Arnold has written a perl implementation! Much easier to read than the lisp version :) -- Mike