You're viewing old version number 1. - Current version

#!/usr/bin/perl

use strict;
use warnings;
use Proc::Daemon;

Proc::Daemon::Init;

my $continue = 1;
$SIG{TERM} = sub { $continue = 0 };

while ($continue) {
     <a href="/cgi-bin/junco.pl/tag/do">#do</a> stuff
}

From JR's : articles
34 words - 412 chars
created on Nov 14, 2014 at 02:44:47 pm - #
source - versions

Related articles
Run perl script as a daemon - Nov 14, 2014
Loop through a Perl array - Oct 02, 2013
Perl links to read - Jul 09, 2013
Installing a Perl Module - Jan 13, 2015
Perl programming tools to test - Nov 14, 2014
more >>