[perl] cadenas, busqueda y sustitucion

[Jose Antonio Galicia]

On Tue, 10 Oct 2000, Cesar Villegas wrote:

> como puedo hacer para que eliminar todo lo que no este entre < > de
> cada una de las lineas???

 Para cada línea del archivo aplicas una formula como esta:

	s/*.(<.*>)*./$1/;

 Que básicamente dice que separe en tres grupos los datos: Lo que esta
antes del "<", los que esta entre "< >" y lo que esta despues de ">". Una
vez hecho esto que lo substituya todo por lo que parece entre "()" ya que
en este caso se interpreta como un agrepador por lo que el "$1" significa
el grupo uno por así decirlo.

 Para más información consulta la documantación de "perlre":

	perldoc perlre

 Una nota extra: Si la línea fuera "mi <mama es > mi papa> y le pega" el
resultado puede que no sea el que esperas... o puede que sí. ¿Y con una
como esta "mi <papa es < mi mama> y se deja"? :)

 Que te diviertas.

 Saludos,
 Toño.
---
 mailto: jcgalici@cbbanorte.com.mx

--------- Pie de mensaje --------------------------------
Visite: http://tlali.iztacala.unam.mx/~randrade/perl.shtml
Cancelar inscripcion:
mail to: majordomo@tlali.iztacala.unam.mx
text   : unsubscribe perl