use List::Util 'shuffle'; my @nums = shuffle( 50 .. 200 );