my @range = ( 50 .. 200 );
my $random_number = $range[rand(@range)];