Foro - Perl en Español

¿Podría ayudarme alguien con un programa?

Tengo un array con una serie de elementos. Utilizo un foreach() para comprobar si cada uno de los elementos cumple una condición.

Mi problema es que si cumple la condición quiero que me borre dicho elemento del array, pero no sé cómo hacerlo...

Bienvenido a los foros de Perl en Español, ingeniero.

Para quitar un elemento del principio del array se usa shift().
Para quitarlo del final, pop().
Y para quitarlo de en medio (o de cualquier parte), splice().

¡Ojo!

Si quitas un elemento de en medio, todos los elementos siguientes "corren" un puesto hacia arriba, así que sus índices cambian. Cuidado con los bucles...

Más información en tu propio ordenador en perldoc perlfunc, y en la Web (traducido).

¿Cómo se utiliza la función splice ()?

¡¡Gracias por contestar!!

Sacado de perlfunc:

«
splice ARRAY o EXPR,DESPLAZAMIENTO,LONGITUD,LISTA
splice ARRAY o EXPR,DESPLAZAMIENTO,LONGITUD
splice ARRAY o EXPR,DESPLAZAMIENTO
splice ARRAY o EXPR

Elimina los elementos designados por DESPLAZAMIENTO y LONGITUD de un array, y los sustituye por los elementos de LISTA, si los hubiere. En contexto lista, devuelve los elementos retirados del array. En contexto escalar, devuelve el último elemento eliminado, o "undef" si no hay elementos eliminados. El array crece o se reduce según sea necesario. Si el DESPLAZAMIENTO es negativo, se cuenta la posición desde el final del array. Si se omite LONGITUD, se suprime todo desde DESPLAZAMIENTO en adelante. Si LONGITUD es negativa, elimina los elementos desde DESPLAZAMIENTO hacia adelante, excepto -LONGITUD elementos al final del array. Si ambos DESPLAZAMIENTO y LONGITUD se omiten, quita todo. Si el DESPLAZAMIENTO es más allá del final del array, Perl lanza una advertencia, y extrae al final del array.

Las siguientes equivalencias se mantienen (suponiendo que "$[ == 0 y $#a >= $i" )



Ejemplo, suponiendo que las longitudes de array se pasan antes que los propios arrays:



A partir de Perl 5.14, "splice" puede tomar una EXPR escalar, que debe contener la referencia a un hash o un array no bendecido. El argumento es desreferenciado automáticamente. Este aspecto de "splice" es considerado altamente experimental. El comportamiento exacto puede cambiar en una futura versión de Perl.
»

Ejemplo:

¿Cómo se puede sacar de un hash una clave que desconocemos sabiendo su valor?

Mejor dicho: ¿cómo se pueden sacar de un hash todas las claves que desconocemos sabiendo su valor?

Gracias.

Una forma: Usamos each() para recorrer los pares clave/valor, y miramos cada uno:

Otra: hacemos un filtrado con grep() y sacando las claves con keys():


Mas información en perldoc -f keys .
Mas información en perldoc -f grep .
Mas información en perldoc -f each .

¡¡Hola!! Ahora tenemos que hacer un programa en el que tenemos varios jugadores y lanzan dos dados. Avanzan según la suma de los dos resultados de los dos dados pero si sacas un 1 con el primer o segundo dado y en la tirada que sea, el jugador puede decidir si vale 1 o 6. Hemos usado un foreach() para la tirada de cada jugador para que así te salga su nombre y cuantas casillas avanza pero no sabemos cómo poner que cada vez que saque un 1 le pregunte el valor que le quiere dar.

¡¡GRACIAS!!

¿Con un if()?

¿Y no hay alguna forma de hacerlo utilizando subrutinas? Gracias.

Pues sí... se puede meter un if() dentro de una subrutina...

Y como se podría ejecutar una subrutina asociada a cada valor del dado, se podría hacer una matriz de despacho, por ejemplo.