in reply to
Picking a random item through probability
Weighted random numbers generator
seems to discuss this in depth.
Comment on
Re: Picking a random item through probability
In Section
Seekers of Perl Wisdom