Daemon::Generic::While1(3)

NAME
 Daemon::Generic::While1 - Daemon framework with default while(1) loop

SYNOPSIS
 @ISA = qw(Daemon::Generic::While1);

 sub gd_run_body {
        # stuff
 }

DESCRIPTION
This is a slight variation on Daemon::Generic: a default "gd_run()" provided. It has a while(1) loop that calls "gd_run_body()" over and over. It checks for reconifg and and terminate events and only actions them between calls to "gd_run_body()".

Terminate events will be forced through after $Daemon::Generic::force_quit_delay seconds if "gd_run_body()" doesn't return quickly enough.

SUBCLASS METHODS REQUIRD
The following method is required to be overridden to subclass Daemon::Generic::While1:

gd_run_body()
    This method will be called over and over. This method should include a call to sleep(1) (or a bit more). Reconfig events will not interrupt it. Quit events will only interrupt it after 15 seconds.

ADDITIONAL METHODS
The following additional methods are available for your use (as compared to Daemon::Generic):

gd_sleep($period)
    This will sleep for $period seconds but in one-second intervals so that if a SIGINT or SIGHUP arrives the sleep period can end more quickly.

    Using this makes it safe for "gd_run_body()" to sleep for longer than $Daemon::Generic::force_quit_delay seconds at a time.

ADDITIONAL MEMBER DATA
The following additional bits of member data are defined:

gd_sigint
    The time at which an (unprocessed) SIGINT was received.

gd_sighup
    The time at which an (unprocessed) SIGHUP was received.

LICENSE
Copyright (C) 2006-2010 David Muir Sharnoff <muir@idiom.com>. Copyright (C) 2011 Google, Inc. This module may be used and distributed on the same terms as Perl itself.