I wrote a mud in perl a long time ago and occasionally go back and work on it a bit more. It's rather far along but ... it is HORRIBLY written. (It was my first real perl project before i even started coming here...)
It's at http://northlandsmud.com
It might give you some ideas...