Perl et rc scripts

Bonjour,

J'ai un petit problème avec un démon perl que je lance par un startup
script : s'il se lance correctement, se met en arrière plan, et fait
bien son boulot, les commandes status et stop sont inopérantes.

Mon rc-script est basique et conforme au handbook :

---------------8<--------------
name="leases_survey"
leases_survey_pidfile="/var/run/leases_survey.pid"
rcvar=`set_rcvar`

load_rc_config $name

: ${leases_survey_enable="NO"}
command="/root/bin/leases_survey.pl"
pidfile="/var/run/leases_survey.pid"

run_rc_command "$1"
---------------8<--------------

Mon code Perl fait les choses proprement :


---------------8<--------------
daemonize();

open PIDF, '>', $PID_FILE or die "Can't open pid file";
print PIDF $$;
close PIDF;
# Do some stuff
---------------8<--------------

et j'ai bien dans /var/run/leases_survey.pid le pid du process en
arrière plan. (cat et ps me donnent effectivement la même valeur)

Pourtant, j'ai ça
# /usr/local/etc/rc.d/leases_survey status
leases_survey is not running.

Pareil pour stop...

Ca ne serait qu'un détail si mon watchdog ne s'appuyait pas sur ce
mécanisme aussi.

J'ai dû louper quelque chose, mais je ne vois absolument pas quoi...

Merci,

--
XAv
Disponible au 01/06/2010
<http://www.xavierhumbert.net/perso/CV2.html>