@array= (.....);
$elem=$array[rand(@array)];