Foro - Perl en Español

Hola, acá estoy otra vez , quiero hacer algo y no me está saliendo como quiero

Tengo el siguiente texto:

algo <title> Aca hay texto....</TITLE> otra cosa

Esto lo tengo guardado en la variable por defecto.

Lo que quiero es guardar en una variable todo el texto que está entre <title> y </TITLE>
y en otra variable distinta guardar todo el texto que está después de </TITLE>

Para hacer esto puse en una línea con la siguiente expresión regular



Entonces se que en:

Código: Seleccionar todo

$1  está guardado todo lo que está entre [b]<title>[/b]  y  [b]</TITLE>[/b]
$2  está guardado todo lo que está después de [b]</TITLE>[/b]

El problema surge cuando tengo un \n en cualquiera de los textos ( ya sea antes de <title> ó entre <title> y </TITLE>
ó después de </TITLE>. )

¿Alguien me puede dar una idea de cómo solucionarlo? Disculpen si es tonto pero estoy empezando con Perl.

Gracias

Creo que querías decir


Y para el caso de que haya un \n en la mitad, hay que poner la opción /s a la expresión regular, después de haber leído todo el fichero en una sola variable escalar, claro:

Muhas gracias perdon que no respondi antes pero no podia conectarme a internet.

Saludos