http://qs321.pair.com?node_id=471977


in reply to Random Password Generator

use String::Random qw/ random_string /; use List::Util qw/ shuffle /; print random_string(join '', shuffle((qw/ c C n /) x 3));

ihb

See perltoc if you don't know which perldoc to read!