I'd suggest a modification by using hashes instead of arrays wherever sensible. Code will be upcoming in a node called hangmonk (this node will be updated upon existence of the hangmonk node).

UPDATE hangmonk is now up.

$monks{japhy}++ while $posting;