Using perl Syntax Highlighting
while ($texto =~ />(.+?)</g) {
Coloreado en 0.005 segundos, usando
GeSHi 1.0.8.4
El bucle while() se repite mientras la expresión regular se cumpla.
La opción
/g permite realizar búsquedas secuenciales del patrón dentro de la variable escalar $texto.
El patrón es
/>(.+?)</, que quiere decir:
- busca por el carácter '>'
- seguido por uno o más caracteres (.+), pero en una cantidad mínima (?) hasta antes del siguiente carácter en el patrón (<), y quedan capturados (()) en $1
- seguidos por el carácter '<'
Hoy en día se usa
.+?
para representar la búsqueda de todos los caracteres posibles, pero parando primero en aquél que cumple la condición siguiente del patrón. Hace unos años se escribiría así:
[^<]+
que quiere decir que nos quedamos con uno o más caracteres que no son '<'.
Es más claro usar '.+?', desde luego.
En el patrón usamos los caracteres '>' y '<' porque nos marcan (anclan) perfectamente el lugar donde se encuentra la información que queremos.
