At 14.31 1998.03.30, Greg Dunn wrote: >#init r.n.g. >srand( time() ^ ($$ + ($$ << 15)) ); FYI: in perl5.004 (and by extension, MacPerl5.x.xr4), you don't need to call srand() at all. rand() is autoseeded. -- Chris Nandor mailto:pudge@pobox.com http://pudge.net/ %PGPKey=('B76E72AD',[1024,'0824 090B CE73 CA10 1FF7 7F13 8180 B6B6']) #== New Book: MacPerl: Power and Ease ==# #== Publishing Date: Early 1998. http://www.ptf.com/macperl/ ==# ***** Want to unsubscribe from this list? ***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch