If you really think you want to create an easy-to-use perl script that allows anyone with a user account on a linux box to create a new user account on that box, then either you yourself are a cracker, or else you are (knowingly or not) a cracker's "best friend", i.e. a person who disables a basic and essential security feature.

What you're suggesting is sort of like leaving the key in the lock when you walk away from your house or car. Having an "urgent" need to do so is ridiculous.