in reply to rand with Perl/Tk
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.
|
|---|