[SP-pm] Ajuda expressão regular

[Jorge Teles]

Agradeço a ajuda, mas teria como fazer isso em apenas
uma expressão regular? 

--- Wendel Scardua <wendelscardua em gmail.com> wrote:

> s/[Shelf|on|Slot]//g;
> 
> é igual a
> 
> s/[efhlnotS]//g;
> 
> Você quis dizer:
> 
> s/(?:Shelf|on|Slot)//g;

Esta expressão acima com ?: é uma condição if?

> 
> 
> 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/
> _______________________________________________
> SaoPaulo-pm mailing list
> SaoPaulo-pm em pm.org
> http://mail.pm.org/mailman/listinfo/saopaulo-pm
> 




__________________________________________________
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around 
http://mail.yahoo.com