[Cascavel-pm] Receber uma "resposta" de system("perl aplicacao.pl"); ?

[Luis Campos de Carvalho]

Sandro de Almeida Filho wrote:
> Caro Igor, sua solução me caiu mt bem.
> 
> Porém preciso fazer assim:
> 
> <perl>
> while(1)
> {
>     $resposta = `perl aplicacao.pl`;
> }
> </perl>
> 
> porém enquanto $resposta não for igual a "ok" o loop permanessa parado...
> 
> como eu deveria proceder? usando "sleep" daria certo?

   Você poderia detalhar um pouco mais o que deseja fazer... é muito 
psosível que exista alguma solução "semi-pronta" para o seu problema.

   Acho que uma boa olhada em "perldoc -f open" pode te dar algumas 
idéias interessantes, também... e mais bem-implementadas do que backticks.

   Putamplexos!
-- 
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
  Luis Campos de Carvalho is BSc in Comp Science,
  PerlMonk [SiteDocClan], Sao Paulo PM Leader,
  Unix Sys Admin && Certified Oracle DBA
  http://br.geocities.com/monsieur_champs/
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=

	
	
		
_______________________________________________________ 
Yahoo! Acesso Grátis - Internet rápida e grátis. 
Instale o discador agora! http://br.acesso.yahoo.com/