nice! judging from the result you produced.

Can I suggest Getopt::Long if you haven't already planned for it. And string obfuscation (which is tricky if it contains variables to be interpolated). Anyway, cool!