Un elemento de un array por azar

[monoswim]

Alguien sabe como se hace para agarrar un elemento de un array al azar, que me ezcoja el elemento cualquiera de la lista


Gracias
PD: si me pueden escribir un mini ejemplo para que sepa como se usa, mejor

MonoSwim

[kidd]

Hola...

Aqui te pongo un pequeño ejemplo que se me ocurrio, aunque es muy sencillo lo probe y me funciono:

Código:

my @array = ('Rojo', 'Azul', 'Verde', 'Cafe', 'Morado');

    my $item = int(rand(@array));

    print "Content-type: text/html\n\n";
    print "$array[$item]\n";

SALUDOS

[monoswim]

te agradezco, la entendí pero no se que hace la finción int, voy a probarlo.

Gracias
MonoSwim

[kidd]

La funcion "int" convierte el número en un "interger" en caso de que el número random que seleccione sea "double".

Es decir si el número es decimal, elimina el decimal para que sea un número entero.


SALUDOS

[SpiceMan]

no hace falta int:

Código:

$indice = rand @array;
$elementoalazar = $array[$indice];