use integer;
my @limits = ( [10,40], [20,70], );
my $pick1 = ( 1 + $#limits ) * rand() - 1; }
my $pick2 =
  $limits[$pick1][0] + ( rand() * ( $limits[$pick1][1] - $limits[$pick1][0] );