A simple password generator in PERL.