Foro - Perl en Español

Un saludo.

Tengo este código con el que busco hasta el final de la línea pero me gustaría que buscara hasta que se encuentre un punto, para que me extraiga un texto con coherencia.

A continuación el código:


Y lo que realmente me gustaría que mostrara es lo siguiente:


O que por lo menos muestre todo el párrafo después de Diagnostic-Code: smtp;



Muchas gracias.

Se podría resolver con un rango:

pero... sería mejor tener más información de cómo es el texto de donde queremos extraer esa información. Si es un registro de actividad (log), ese texto vendrá en una sola línea, por lo que la solución es más sencilla.

Muchas gracias por tu respuesta.

En el caso de que quiera retirar de la variable $resultado el texto Diagnostic-Code: smtp;, ¿me recomiendas hacerlo con la función substr()?

Se puede hacer, pero es mucho más cómodo usar una operación de sustitución s///.

explorer escribiste:Se puede hacer, pero es mucho más cómodo usar una operación de sustitución s///.

Excelente

Me he percatado de algo interesante: ¿Qué pasaría si ese dato yo lo quisiera ingresar en un campo de una base de datos? ¿Qué pasaría si ese texto contiene comillas simples? Pasaría que la consulta destinada al hacer el INSERT fallaría y no podría registrar los datos.

Se me ocurrió utilizar la función que me recomendaste (s///) pero, ¿qué pasaría si hay más de una comilla? Pues ahí fue donde se me ocurrió usar un while(), pero ocurre algo. A pesar de que el texto se almacena en toda la variable parece que el salto de página persiste en la variable $resultado y si la comilla está en la segunda línea no las extrae.

Hasta aquí pude avanzar, cualquier ayuda estaría agradecido.

No necesitas quitar las comillas.

Si haces la consulta con el sistema de "placeholders" del módulo DBI, es el propio DBI el que se encarga de "escapar" esos caracteres peligrosos.

Mira este código:

En la primera línea llamamos al método prepare() con la consulta SQL que queremos ejecutar. Es igual a cualquier otra consulta, pero aparecen un par de caracteres '?'. Estos son los que se llaman "placeholder" o guardasitios. El DBI "prepara" la consulta, pero no la ejecuta.

Luego, en la segunda línea es cuando ejecutamos la consulta, pero pasando dos argumentos. Cada argumento se "colocará" en su "placeholder" correspondiente, escapando los caracteres peligrosos. Luego ejecuta la consulta.

Otro ejemplo más sencillo y enlaces.

Sobre la forma de quitar las comillas... hay otra forma más cómoda: sustitución global (/g), sin necesidad de bucles.


No nos has dicho nada de cómo es la información en origen. ¿Realmente te llega en varias líneas o solo en una? Ese tipo de mensajes les veo con frecuencia en nuestros servidores, y llegan en una sola línea. Si es así, la solución se acorta bastante.

La información de origen es una bandeja de correos con sus cabeceras. Pero básicamente la información viene muy parecida en como la presenté en la variable, en algunos casos puede venir con comillas simples y nos puede arrojar un error SQL. Quiero prever la situación, pensé en hacerla con la función para no meternos con los query.

Entonces con el sistema de "placeholder" lo tienes resuelto, no tienes que quitar nada.

explorer escribiste:Entonces con el sistema de "placeholder" lo tienes resuelto, no tienes que quitar nada.

El problema es que la persona que construyó el codigó inicial para hacer los INSERT en la base de datos lo hizo de una manera que no sé si fue la mejor pero creo que tendríamos que hacer cambios importantes en el código.