use strict;
use warnings;
use Math::Random::MT::Auto::Range;

my $rng = Math::Random::MT::Auto::Range->new (
    LO   => 10000,
    HI   => 99999,
    TYPE => 'INTEGER'
);
my $A = $rng->rrand ();
my $B = $rng->rrand ();
my $str = "$A $B";

print "perl version $]\n";
print "Math::Random::MT::Auto::Range version $Math::Random::MT::Auto::Range::VERSION\n";
print $str;

##</code><code>##

perl version 5.010001
Math::Random::MT::Auto::Range version 6.16
33649 69127