For a trimmed down version of this script please see this post by Radimus.

http://www.kixtart.org/cgi-bin/ultimatebb.cgi?ubb=get_topic&f=1&t=007670