🚀 go-pugleaf

Angel Luis Jim�nez Mart�nez <al026635@alumail.uji.es> wrote:
> Saiyine <saiyine@clubdelphi.com> wrote:
>> Buenas

>> Llevo toda la tarde intentando hacerme un peque�o programa que usa como 
>> entrada xml y no consigo dar con la expresion regular que extrae la 
>> informacion si hay mas de un "dato" en la misma linea con el mismo nombre.

>> Resumiendo, se trataria de, dadas dos palabras clave, obtener el texto entre 
>> la primera y la primera aparicion de la segunda, en vez de el 
>> comportamiento "standard" de perl que es devolver el texto entre la primera 
>> y la ultima aparicion de la segunda.

>> Por ejemplo, dada la linea:

>> <info>prueba1234</info><info>blablablabla</info>

>> me gustaria saber una expresion regular que devuelva prueba1234.

>> Despues de toda la tarde buscando infructuosamente en el google, lo unico 
>> que he encontrado es que la expresion que deberia funcionar es:

>> /<info>([^.info]*)</info>/

>> Que deberia dejar en $1 el valor "prueba1234", pero en la practica no 
>> funciona.

>> �Alguna idea?

> $cad= "<info>prueba1234</info><info>blablablabla</info>";
> $cad=~ s/<info>([^<]+)<\/info>.*/$1/;
> print "$cad\n";

> Con el [^<] aseguras que pillas caracteres hasta que encuentra el < del
> primer </info>. Y el .* final sirve para que se "coma" el 
> <info>blablablabla</info> y lo que haya despues.


Otra cosa, casi mejor que uses * en vez de +. Asi no tendras que preocuparte
de casos como "<info></info>".