The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package t::Role::PRNG;

use Moose;
use Method::Signatures;

with 'Bio::Community::Role::PRNG';


# This is simply a test module that consumes the PRNG role.

method get_random_number ($num = 10) {
   # Random integer in the range [1, 10]
   return int( $self->rand($num) ) + 1;
}

__PACKAGE__->meta->make_immutable;

1;