NAME Random::Set - Class for random set generation. SYNOPSIS use Random::Set; my $obj = Random::Set->new(%params); my $random = $obj->get; METHODS "new(%params)" Constructor. * "precision" Precision. Default value is 100. * "set" Set definition. Set is array of arrays with pairs of probability and value. Default value is []. It is required. Sumary of probabilities must be 1. "get()" Get random value from set. Returns value from set. ERRORS new(): Bad set sum. Must be 1. From Class::Utils::set_params(): Unknown parameter '%s'. EXAMPLE # Pragmas. use strict; use warnings; # Modules. use Random::Set; # Object. my $obj = Random::Set->new( 'set' => [ [0.5, 'foo'], [0.5, 'bar'], ], ); # Get random data. my $random = $obj->get; # Print out. print $random."\n"; # Output like: # foo|bar DEPENDENCIES Class::Utils, Error::Pure. SEE ALSO Random::Day. REPOSITORY <https://github.com/tupinek/Random-Set> AUTHOR Michal Å paÄek <mailto:skim@cpan.org> <http://skim.cz> LICENSE AND COPYRIGHT BSD license. VERSION 0.02