Is there a better way to generate unique set of random numbers ?

[chakreey]

Hello Monks,

I am trying to generate set of unique random numbers. Here is my script for doing this

use strict;
use warnings;

my (@RandomSet,$random_number, $element_of_array, $count);

foreach(1..10){
$random_number = int(rand(1185)); 
$count=0;
foreach $element_of_array (@RandomSet){
if ($random_number == $element_of_array){ 
$count++;
}
}
push (@RandomSet,$random_number) if $count==0;
}

foreach $element_of_array (@RandomSet){
print "$element_of_array\n";
}

for every new random number generated, I am finding out if it is unique or a repeat. Is there a better/faster way to achieve this ?

TIA