<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">NAME
    Random::Set - Class for random set generation.

SYNOPSIS
     use Random::Set;
     my $obj = Random::Set-&gt;new(%params);
     my $random = $obj-&gt;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-&gt;new(
             'set' =&gt; [
                     [0.5, 'foo'],
                     [0.5, 'bar'],
             ],
     );

     # Get random data.
     my $random = $obj-&gt;get;
 
     # Print out.
     print $random."\n";

     # Output like:
     # foo|bar

DEPENDENCIES
    Class::Utils, Error::Pure.

SEE ALSO
    Random::Day.

REPOSITORY
    &lt;https://github.com/tupinek/Random-Set&gt;

AUTHOR
    Michal �麖a�嶤k &lt;mailto:skim@cpan.org&gt;

    &lt;http://skim.cz&gt;

LICENSE AND COPYRIGHT
    BSD license.

VERSION
    0.01

</pre></body></html>