#!/usr/bin/perl use strict; use POSIX; # run in background? # 1 = yes, 0 = no my $daemon = 1; #change namelisting in ps, # but killall still requires real name #$0 = 'daemonz'; if($daemon) { exit if fork; POSIX::setsid(); } # script goes here while(1){sleep(1)}
In reply to Re: how to make a demon in perl?
by zentara
in thread how to make a demon in perl?
by Sihal
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |