NAME
Data::Random::Weighted - get weighted random data
VERSION
version 0.002
Data::Random::Weighted
Used to return random results from a weighted set.
Usage
my $rand = randomizer({ 'Result' => 5, 42 => 1, });
print &$rand;
Signature
.’│_.-
.’ ’ /_
.-" -. ’>
.- -. -. ’. / /│_
.-.--.-. ’ > / /
(o( o( o ) \_." <
’-’-’’-’ ) <
( _.-’-. ._\. _\
’----"/--.__.-) _- \│
AoS "V"" "V"
AUTHOR
Russel Fisher <geistberg@gmail.com>
COPYRIGHT AND LICENSE
This software is copyright (c) 2014 by Russel Fisher.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.