You can also use String::Random. I use that for password generation. It is easy to use:

use String::Random;

my $rand = new String::Random;
$rand->{'A'} = [ 'A'..'Z', 'a'..'z' ];
$rand->{'D'} = [ '1'..'9' ];    # no zero
$passwd = $rand->randpattern("AAAADAAAD");
print "Password $passwd\n";
[download]

Easy. It even lets you optionally choose the format of the password (which is the AAAADAAAD stuff) and the char set. I don't like zeroes in passwords: too hard to distinguish from O's when handing them out.

HTH, --traveler