in reply to Test if Daemon::Control daemon is running.

I don't think Daemon::Control lets you query the daemons like that. I believe you have to check the system environment to see if it's running, as you are. This works too:
$running = `pgrep -x script.pl`;