Foro - Perl en Español

Hola, os dejo este reto que he encontrado en otros foros. El objetivo es solucionarlo utilizando Perl.

Cada letra tiene un valor y hay que encontrar mediante un algoritmo cuáles son los valores de las letras.

Bueno, como a mí me gustan las expresiones regulares, lo he resuelto usando (su) fuerza bruta.

Buen código, explorer, el mio es más humilde .



EDITO: Lo he resumido un poco el código ¡je,je!

Es la misma solución, así que no es una solución humilde. Enhorabuena también para ti.

Si acaso, una forma más perlera de escribir los bucles sería así:

for $m (1 .. 9) {

Dándole vueltas y siguiendo tu consejo sobre los for, lo he conseguido resumir aún más.



Creo que ya está resumido al máximo.

También he intentado entender la expresión regular tuya, pero no comprendo este trozo:



¿Me lo podrías explicar? Lo he intentado entender buscando más información, pero nada.

La estructura es:

(?(condición)patrón-sí|patrón-no)

(En este caso concreto, no está la parte de patrón-no)

Se trata de una estructura que comprueba una condición. Si la condición es verdadera, el resultado de la estructura será un patrón: el indicado por patrón-sí. Si no es verdadera, devuelve el patrón-no.

Esto se usa para indicar distintos patrones de búsqueda según el valor de una condición.

En este caso, la condición es

(?{ ... })

que es una estructura que contiene una expresión Perl, que es evaluada. En este caso, se pasan a las variables $M, $A y $D la longitud de las capturas de paréntesis realizadas antes (líneas anteriores a las mostradas). Y se termina con una comparación de igualdad, similar a la de tu último código.

Si el resultado de esta condición es verdadera, se ejecuta la parte de patrón-sí, que resulta que es:

(?{ say "$M$A$D"; })

que a su vez es otro código Perl ejecutable. En este caso, un simple say(), sacando el resultado correcto de la búsqueda.

Como no hay patrón-no, pues no hace nada en caso de que la condición falle.

Después de eso, hay un patrón predefinido:

(*FAIL)

Este patrón no coincide con nada. Solo provoca un "fallo de coincidencia" al motor de expresiones regulares, haciéndole creer que la búsqueda actual ha fracasado, y que debe reintentarlo con otro patrón distinto. Lo que hace el motor de expresiones regulares es volver atrás, y volver a ajustar los parámetros de búsqueda de las 'M', en la parte de '{1,9}', probando con otra combinación.

Todo esto es para imitar el funcionamiento de tres bucles anidados: el motor de expresiones regulares probará con todas las combinaciones de '{1,9}'.


Más información en tu propio ordenador en perldoc perlre, y en la Web (traducido al español).

Gracias, explorer, pero entonces en tu código ¿qué condición se supone que se cumple aquí? (?(?{, debajo de los M{1..9}. ¿Y por qué la condición que muestra el mensaje del número correcto está fuera de los paréntesis que contienen la comparación?

Perdón por ser pesado pero no lo termino de comprender.

¿Seguro que está fuera ? Está a continuación. Y hay un paréntesis de cierre de la condición.

Cuando me refiero a condición, me refiero a esta estructura:

(?(condición)patrón-sí)

(condición) es la condición que comprueba si hemos encontrado los valores correctos que cumplen con la condición matemática. Si se cumple, se devuelve patrón-sí. Tanto condición como patrón-sí son, a su vez, ejecución de código, así que tienen sus propios paréntesis adicionales.

Fíjate en el código que publiqué al principio.

• en la línea 5 se crea la cadena de caracteres donde vamos a realizar las búsquedas
• en la línea 6 está el operador de exp. reg., y el delimitador del patrón, que termina en la línea 23
• en la línea 7 indicamos que todas las búsquedas deben estar ancladas al principio de la cadena
• en las líneas 8 a 9 indicamos que esperamos tres conjuntos de letras 'M', de entre una a nueve letras
• en la línea 11 comienza la condición, que termina en la línea 21
• la condición que se va a probar está entre las líneas 11 y 17, incluidas; y la parte que se ejecuta si la condición se cumple, son las líneas 18 a 20, incluidas
• después de la condición, viene el FAIL, que está en la 22, así que se ejecuta siempre (no está dentro de la condición)
• en la línea 23 termina el patrón, junto con la opción x, que es la que nos permite escribir el patrón con espacios en blanco y en varias líneas

Espero que quede claro. Si no, vuelve a preguntar, que no pasa nada.

Vale... creo que ahora sí lo entiendo pero, si es como yo quiero entender, la condición es así:

(? (?{CONDICION-A-CUMPLIR}) (?{VERDADERO}) | (?{FALSO}) )

¿No?

EDITO: Vale, ya he comprobado mi teoría, ¡je,je!