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.

Hi,
but the same perldoc says,

....
Note that you need something much more random than the default seed for
cryptographic purposes.  Checksumming the compressed output of one or more
rapidly changing operating system status programs is the usual method.  For
example:

     srand (time ^ $$ ^ unpack "%L*", `ps axww | gzip`);


To Unsubscribe: send mail to [EMAIL PROTECTED]
with "unsubscribe freebsd-stable" in the body of the message

Reply via email to