<span style="font-family: courier new,monospace;">Marcelo,</span><br style="font-family: courier new,monospace;"><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;">Se eu posso recomendar uma coisa, eu recomendo que você evite utilizar processo externos ao código (qx, system, exec) em programas sério e complexos. Se você estiver utilizando para uma coisa eventual tudo bem, mas evite se estiver utilizando para algo que está sendo utilizado em produção no servidor. No teu caso em particular, existe várias técnicas para ler o arquivo, como o slurp[1] por exemplo.</span><br style="font-family: courier new,monospace;">
<br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;">O problema de fazer do modo que você está fazendo inicia pela falta de controle da operação (se o arquivo não existir ?), passa pelo blocking do aplicativo nesta instrução até o sério potencial problema de segurança.</span><br style="font-family: courier new,monospace;">
<br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;">Se executar processo externo faz-se necessário, tem outras técnicas para isto, mas eu recomendo fortemente só as utilizarem quando realmente necessário.</span><br style="font-family: courier new,monospace;">
<br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;">Abraços,</span><br style="font-family: courier new,monospace;"><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;">Solli M. Honório</span><br style="font-family: courier new,monospace;">
<br style="font-family: courier new,monospace;"><br style="font-family: courier new,monospace;">[1] <a href="http://www.perl.com/pub/a/2003/11/21/slurp.html">http://www.perl.com/pub/a/2003/11/21/slurp.html</a><br><br><div class="gmail_quote">
2010/7/2 Marcelo Gigliotti <span dir="ltr"><<a href="mailto:marcelo.gigliotti@gmail.com">marcelo.gigliotti@gmail.com</a>></span><br><blockquote class="gmail_quote" style="margin: 0pt 0pt 0pt 0.8ex; border-left: 1px solid rgb(204, 204, 204); padding-left: 1ex;">
<div>Srs do conselho :-),</div>
<div> </div>
<div>estou desenvolvendo um script pra fazer algumas validações nos meus servidores... casos particulares da app mesmo... e estou com a seguinte situação...</div>
<div> </div>
<div>em determinado momento... eu tenho o seguinte bloco</div>
<div> </div>
<div>my $conf_local = "server 192.168.10.3";</div>
<div>my @conf_srv = qx(cat /etc/ntp.conf | grep -i ^server);</div>
<div>este comando me retorna algumas linhas... como</div>
<div> </div>
<div>*****</div>
<div>server 192.168.1.2</div>
<div> </div>
<div>***********</div>
<div> </div>
<div>if ( grep (! /$conf_local/,@conf_srv) {</div>
<div> print "Nao encontrado";</div>
<div>}</div>
<div> </div>
<div>O problema é que neste caso... a função grep sempre está retornando true, mesmo não havendo a linha pesquisada... fiz alguns testes e descobri que ele não está procurando a string server apenas e não a linha inteira como desejo server 192.168.10.3</div>
<div> </div>
<div>alguém poderia me dar uma dica? de como pesquisar a linha inteira mesmo com espaços... li alguma coisa com a função map... mas ainda não tive tempo de testar... alguém teria outra idéia melhor?</div>
<div> </div>
<div> </div>
<div>Abs<br clear="all">Marcelo Gigliotti<br>Analista de Suporte<br>Red Hat Certified Technician<br><a href="http://www.tabugado.com" target="_blank">www.tabugado.com</a><br>Msn: <a href="mailto:tchelllo@hotmail.com" target="_blank">tchelllo@hotmail.com</a><br>
Linux User: #392364<br></div>
<br>_______________________________________________<br>
SaoPaulo-pm mailing list<br>
<a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br></blockquote></div><br><br clear="all"><br>-- <br>"o animal satisfeito dorme". - Guimarães Rosa<br>