[Rio-pm] quote regular expression
Tiago Peczenyj
tiago.peczenyj em gmail.com
Quinta Março 25 08:18:56 PDT 2010
Ola
Estou com uma duvida no quote regular expression qr
vejam este exemplo
my $dryrun = (grep qr/^-{1,2}dry/, @ARGV) ? 1 : 0;
@ARGV = grep !/^-{1,2}dry/, @ARGV;
print "ok $dryrun\n";
foreach my $a (@ARGV){ print "> $a\n"; }
$ perl a.pl -dry 1 2 3
ok 1
> 1
> 2
> 3
neste exemplo eu filtro a opção -dry dos argumentos (ok, não preciso
fazer assim mas.... ) porem se eu faço
@ARGV = grep !qr/^-{1,2}dry/, @ARGV;
o @ARGV fica vazio! deveria ser equivalente grep !/xxx/ e grep
!qr/xxx/ -> sendo que tentei colocar parentesis em tudo para ver se
era questão de prioridade.
alguem imagina o que houve?
--
Tiago B. Peczenyj
Linux User #405772
http://pacman.blog.br
Mais detalhes sobre a lista de discussão Rio-pm