Also, you might want to take a peek at Pod::Usage for creating help messages with variable verbosity.

This might be overkill for your program, but I found it very useful for larger tools.

-- 
Joost       downtime n. The period during which a system
            is error-free and immune from user input.
[download]