Not a perl solution, but you could sidestep the problem by use of auth groups with different levels of privilege. You'll probably want to segregate your higher privilege forms in a subdirectory with a higher privilege group required. See mod_auth and friends in the Apache docs.

After Compline,
Zaxo