Eu tenho um script em Perl e preciso colocar ele para rodar como Daemon.
Ok, até ae basta eu chamar ./script.pl e tudo funciona perfeito.
Mas além disso eu gostaria de colocá-lo na inicialização do sistema.
Para isso eu encontrei em
No inicio do seu script, via funcao interna do perl (em C seria getpid()
), identifique o pid que o processo pegou,
veja se não existe o arquivo /var/run/nomedoseuperl.pid, se existir é pq
ele já está rodando
se não existir, crie esse arquivo contendo apenas o pid do seu processo.
Assim quando
Em Tue, 07 Nov 2006 11:38:08 -0200
Rodrigo Salvador [EMAIL PROTECTED] escreveu:
A minha dúvida fica no 'stop'. Como eu consigo identificar e matar o
processo do meu script ?
/var/run/nome.pid?? os identificadores ficam lá. Ponha seu script pra
rodar e verifique qual o nome que êle usa pra se
Oi, olha esta rc aqui:
http://stockrt.unicruz.edu.br/netact/netact/scripts/netact.sh
Att,
RS
On 11/7/06, irado furioso com tudo [EMAIL PROTECTED] wrote:
Em Tue, 07 Nov 2006 11:38:08 -0200
Rodrigo Salvador [EMAIL PROTECTED] escreveu:
A minha dúvida fica no 'stop'. Como eu consigo
Rogério Schneider wrote:
Oi, olha esta rc aqui:
http://stockrt.unicruz.edu.br/netact/netact/scripts/netact.sh
Att,
RS
On 11/7/06, irado furioso com tudo [EMAIL PROTECTED] wrote:
Em Tue, 07 Nov 2006 11:38:08 -0200
Rodrigo Salvador [EMAIL PROTECTED] escreveu:
A minha dúvida fica no
O da maneira que eu usei foi com redir para /dev/nul, já que o
NetAct roda por si só em background, com fork mesmo.
Teria que add o ao final da linha toda, sozinho :)
Bem, se vc conseguiu, vitória! Revisa teu grep ai que tem coisa a
mais Esse .sh ai vc não precisa filtrar.
Att,
RS
On
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
Só não esquecendo que você deve usar um laço infinito dentro do código
do teu processo filho, senão a própria idéia de daemon deixa de ter
sentido.
[]'s
2006/11/7, c0re dumped [EMAIL PROTECTED]:
Uma maneira mais elegante de fazer uma daemon em per é usar fork:
#!/usr/bin/perl
if (
8 matches
Mail list logo