Re: Writing a Perl Daemon


The stupid question is the question not asked
	PerlMonks

Re: Writing a Perl Daemon

by jdhedden (Deacon)

on Jul 28, 2005 at 13:58 UTC ( [id://478977]=note: print w/replies, xml )

Need Help??

in reply to Writing a Perl Daemon

cees' example above is extremely comprehensive, but here's something to show just the bare bones of what's needed.

#!/usr/bin/perl

use strict;
use warnings;

use Proc::Daemon;
use Proc::PID::File;

MAIN:
{
    # Daemonize
    Proc::Daemon::Init();

    # If already running, then exit
    if (Proc::PID::File->running()) {
        exit(0);
    }

    # Perform initializes here

    # Enter loop to do work
    for (;;) {
        # Do whatcha gotta do
    }
}
[download]

Remember: There's always one more bug.