[Programación] Re: [Programación] dolor de cabeza con perl y
expresiones regulares...
Federico Wiecko
programacion@lugro.org.ar
Fri, 5 Aug 2005 12:24:05 -0300
Hola,
On Friday 05 August 2005 10:50, Horacio Castellini wrote:
> Holas...
>
> Por qué cuernos no funca esta regla en "perl" y si en "sed" ???
>
> s/(=\?iso-8859-1\?)+//g;
> s/(=\?ISO-8859-1)+//g;
> s/(\[LUG.ro\]|=5BLUG.ro=5D)+//g;
>
> en estas frases....
estas seguro que en sed funciona ? que sed estas usando ?
$ echo "=?iso-8859-15BFDebiantieneproblemasde seguridad?" | sed
's/(=\?iso-8859-1\?)+//g'
$ =?iso-8859-15BFDebiantieneproblemasde seguridad?
para qué utilizar el parentesis para guardar la expresion si posteriormente no
lo usas en la sustitución ?
para hacer lo que vos queres tendrías que hacer algo asi en perl
#!/usr/bin/perl
$_="=s/(=\?iso-8859-1\?)+//g";
s/\=\?iso-8859-1...//g;
print;
otra cosa, para que distinguis mayuscula de minuscula? , ..
si haces s/\=\?iso-8859-1...//ig; deja de ser case sensitive.
Mas info: man perlre
Slds.
Federico .-
>
> =?ISO-8859-1BFDebian tiene problemas de seguridad?
> =?iso-8859-15BFDebiantieneproblemasde seguridad?
>
> ya que no elimina ni a garrotazos el molesto =?ISO-8859-1 et al...
>
> _______________________________________________
> Programacion mailing list
> Programacion@lugro.org.ar
> http://www.lugro.org.ar/mailman/listinfo/programacion