[Cascavel-pm] Acessando funcoes dentro de um while
Antonio Carlos I. Paes
lists em xms.com.br
Quarta Junho 7 11:37:32 PDT 2006
Lista,
Estou tentando escrever um codigo onde o script ira ler um FIFO e executar
uma sub-rotina, porem dentro do "while" nao consigo executa-la, alguem pode
me ajudar?
#! /usr/bin/perl -w
$fifo = 'fifo';
sub Teste {
print 'cof\n';
}
while (1) {
open(FIFO,"$fifo") || die("$!");
$string = <FIFO>;
close(FIFO);
print "Saindo na tela do programa em execucao: " . $string;
&Teste;
}
So vejo na tela de execucao do programa o "Saindo na tela....", porem se tiro
do "while" o &Teste executa normal!
Desde ja,
Obrigado.
Mais detalhes sobre a lista de discussão Cascavel-pm