my $z = random(10,10);
print $z->min, $z->max;