in reply to Poisson distr
use Math::Random qw(random_poisson); my $rnd = random_poisson($n, $mu); [download]