File Coverage

blib/lib/Data/Gimei.pm

Criterion	Covered	Total	%
statement	24	24	100.0
branch			n/a
condition			n/a
subroutine	9	9	100.0
pod	0	2	0.0
total	33	35	94.2

package Data::Gimei;

use warnings;
use v5.22;

use version; our $VERSION = version->declare("v0.2.0");

use Data::Gimei::Name;
use Data::Gimei::Address;
use Data::Gimei::Word;
use Data::Gimei::Random;

my $r = Data::Gimei::Random->new;

sub set_random_seed {
    my $seed = shift;
    $r->set_seed($seed);
}

sub sample {
    my $array = shift;
    return $r->next_sample($array);
}
1;

__END__