Uma maneira mais "elegante" de fazer uma daemon em per é usar fork:
#!/usr/bin/perl
if ( !($pid=fork()) ) {
# Aqui vem o códifo do teu programa principal, ou mesmo o conjunto de
funcões que
# voce usará para excutar a tarefa.
# Nessa thread o valor de $pid pra você é 0
} else {
# Aqui é o processo pai. O valor de $pid nessa thread é o pid do
processo filho em excução.
# Voce pode jogar $pid para /var/run/seuproc.pid, se você tiver
permissão, claro.
}
Depois é só fazer um script rc e chamar sem a necessidade de um '&' no
final, usando o valor contido em /var/run/seuproc.pid... voê ainda tem
a opção de manipular os sinais a seu gosto dentro do teu script. É
(quase que) praticamente como em C.
Sugiro que ante dê uma olhada em
http://perldoc.perl.org/index-functions.html , programação usando fork
exige alguns cuidados, senao voce vai acabar ficando cheio de zumbis.
[]'s
--
No stupid signatures here.
-------------------------
Histórico: http://www.fug.com.br/historico/html/freebsd/
Sair da lista: https://www.fug.com.br/mailman/listinfo/freebsd
