#!/usr/bin/perl
 
use POSIX qw(setsid);
 
fork and exit;
fork and exit;
chdir("/");
setsid;
exec @ARGV
  or die "Couldn't exec @ARGV: $!\n";

##</code><code>##

/usr/local/sbin/daemon.pl \
  /usr/local/sbin/relaydelay.pl $CONFIG \
  >/var/log/relaydelay.log 2>&1