At 10:01 PM 7/10/01 +0900, HIRATA Yasuyuki wrote:
> > What about a
> > srand (time ^ $$ ^ unpack "%L*", `ps -auxw | gzip`);
> >
> > at the start of your program
>
>If you use perl 5.005 or later, it's better to call srand without seed
>or not to call srand at all. See perldoc -f srand for detail.
A DES (and MD5) salt (and the rest of the hash) can contain a-z A-Z
0-9 . and /
To Unsubscribe: send mail to [EMAIL PROTECTED]
with "unsubscribe freebsd-stable" in the body of the message
Hi,
From: Mike Tancsa <[EMAIL PROTECTED]>
To: Jim Weeks <[EMAIL PROTECTED]>
Subject: Re: Generating encrypted passwords
Date: Tue, 10 Jul 2001 08:23:47 -0400
Message-ID: <[EMAIL PROTECTED]>
> What about a
> srand (time ^ $$ ^ unpack "%L*", `ps -auxw | gzip`);
What about a
srand (time ^ $$ ^ unpack "%L*", `ps -auxw | gzip`);
at the start of your program
and
for the salt, I use this to generate md5 salts which I think I got from
cpan IIRC.
sub salt {
local($salt); # initialization
local($i, $rand);
local(@itoa64) = ( '