$pass .= $array[int(rand(scalar(@array)))]; 

##</code><code>##

  $pass .= $array[rand @array];