List::Util::WeightedRoundRobin - Creates a list based on weighted input

  my $list = [
    {
        name    => 'jingle',
        weight  => 6,
    },
    {
        name    => 'bells',
        weight  => 2,
    },
  ];

  my $WeightedList = List::Util::WeightedRoundRobin->new();
  my $weighted_list = $WeightedList->create_weighted_list( $list );

List::Util::WeightedRoundRobin is a utility for creating a weighted list based on the input and associated weights.

Constructs a new List::Util::WeightedRoundRobin and returns it. Takes no arguments.

Takes an array reference as an argument. The array reference must contain hash entries which have a 'name' and 'weight' key.

If the sources are valid and a weighted list has been created, the method will return a weighted list. In the case of an error, the returned list will be empty.

Alistair Francis, http://search.cpan.org/~friffin/

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.10 or, at your option, any later version of Perl 5 you may have available.