As I recall, there hasn't been a need to seed rand since Perl 5.004.. In newer versions, rand is automatically seeded if called.
PS - And if I was seeding rand, I wouldn't seed it that way... See perldoc -f srand, perldoc -f rand, perldoc -q rand.
Update: Oh. Well. Maybe if I answered questions in a timely manner, instead of floating on a node for awhile and not refreshing to see if any answers have been added, then I wouldn't have duplicated Roy's post :).
/renz.
Put the gun to my head but it was loaded with blanks/
I was laughing all the way to the bank." --Peter Laughner, Dear Richard.
In reply to Re: rand with Perl/Tk
by renz
in thread rand with Perl/Tk
by biochris
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |