To do what? Just generate random passwords?
How about this.
my @c = (a..z,A..Z,0..9,qw|! @ # $ % ^ & * ( ) [ ]|);
for (1..8) { print $c[int(rand(@c) + 1)]; }
Rob
-----Original Message-----
From: Mike [mailto:[EMAIL PROTECTED]]
Sent: Friday, February 08, 2002 4:47 PM
To: [EMAIL PROTECTED]
Subject: Password Generator
IS there a perl password generator out there?
Mike
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
