[SP-pm] Ajuda expressão regular

[Wendel Scardua]

s/[Shelf|on|Slot]//g;

é igual a

s/[efhlnotS]//g;

Você quis dizer:

s/(?:Shelf|on|Slot)//g;


On 7/31/06, Nelson Ferraz <nferraz em gmail.com> wrote:
> Muito boa a sua solução, Vitor. Simplificando um pouco:
>
> while ( <> ) {
>    my ( $d1, $d2 ) = /ifDescr\.(\d+).*STRING:(.*)/;
>    $d1 =~ s/[Shelf|on|Slot]//g;
>    print "$d1 $d2\n";
> }
>
> []s
>
> Nelson
>
> --
> Nelson Corrêa de Toledo Ferraz
>
> Segula Technologies (www.segula.fr)
> Free Software Foundation Associate Member #3203
> Sociedade Perl do Brasil (www.perl.org.br)
> Rede Livre de Compartilhamento de Cultura Digital
> _______________________________________________
> SaoPaulo-pm mailing list
> SaoPaulo-pm em pm.org
> http://mail.pm.org/mailman/listinfo/saopaulo-pm
>


-- 
[]s
Wendel

"Não ajustar o auto-ajuste" - http://wendel.scardua.net/