如何在Linux中将Perl脚本作为系统守护程序运行？

Question

将一个Perl脚本作为一个守护进程在linux中运行的简单方法是什么？

目前,这是在CentOS上.我希望它启动系统并关闭系统,所以一些/etc/rc.d/init.d集成也会很好,但我总是可以添加一个自定义行/etc/rc.d/rc.local.

Answer 1

最简单的方法是使用Proc :: Daemon.

#!/usr/bin/perl

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

Proc::Daemon::Init;

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

while ($continue) {
     #do stuff
}

或者你可以做Proc :: Daemon所做的所有事情:

1. 分叉子进程并退出父进程.
2. 成为会话领导者(将程序与控制终端分离).
3. 分叉另一个子进程并退出第一个孩子.这防止了获取控制终端的可能性.
4. 将当前工作目录更改为"/".
5. 清除文件创建掩码.
6. 关闭所有打开的文件描述符.

与运行级系统集成很容易.您需要一个如下所示的脚本(替换XXXXXXXXXXXX为Perl脚本的名称,YYYYYYYYYYYYYYYYYYY其中包含对其功能的描述以及/path/toPerl脚本的路径)/etc/init.d.由于您使用的是CentOS,因此只要您使用了脚本/etc/init.d,就可以使用chkconfig将其关闭或打开各种运行级别.

#!/bin/bash
#
# XXXXXXXXXXXX This starts and stops XXXXXXXXXXXX
#
# chkconfig: 2345 12 88
# description: XXXXXXXXXXXX is YYYYYYYYYYYYYYYYYYY
# processname: XXXXXXXXXXXX
# pidfile: /var/run/XXXXXXXXXXXX.pid
### BEGIN INIT INFO
# Provides: $XXXXXXXXXXXX
### END INIT INFO

# Source function library.
. /etc/init.d/functions

binary="/path/to/XXXXXXXXXXXX"

[ -x $binary ] || exit 0

RETVAL=0

start() {
    echo -n "Starting XXXXXXXXXXXX: "
    daemon $binary
    RETVAL=$?
    PID=$!
    echo
    [ $RETVAL -eq 0 ] && touch /var/lock/subsys/XXXXXXXXXXXX

    echo $PID > /var/run/XXXXXXXXXXXX.pid
}

stop() {
    echo -n "Shutting down XXXXXXXXXXXX: "
    killproc XXXXXXXXXXXX
    RETVAL=$?
    echo
    if [ $RETVAL -eq 0 ]; then
        rm -f /var/lock/subsys/XXXXXXXXXXXX
        rm -f /var/run/XXXXXXXXXXXX.pid
    fi
}

restart() {
    echo -n "Restarting XXXXXXXXXXXX: "
    stop
    sleep 2
    start
}

case "$1" in
    start)
        start
    ;;
    stop)
        stop
    ;;
    status)
        status XXXXXXXXXXXX
    ;;
    restart)
        restart
    ;;
    *)
        echo "Usage: $0 {start|stop|status|restart}"
    ;;
esac

exit 0

Answer 2

如果您没有Chas建议的Proc :: Daemon.欧文斯,这是你如何手工完成的:

sub daemonize {
   use POSIX;
   POSIX::setsid or die "setsid: $!";
   my $pid = fork() // die $!; #//
   exit(0) if $pid;

   chdir "/";
   umask 0;
   for (0 .. (POSIX::sysconf (&POSIX::_SC_OPEN_MAX) || 1024))
      { POSIX::close $_ }
   open (STDIN, "</dev/null");
   open (STDOUT, ">/dev/null");
   open (STDERR, ">&STDOUT");
 }

Answer 3

我认为最简单的方法是使用守护进程.它允许您作为守护程序运行任何进程.这意味着,如果您决定更改为python,则不必担心库.要使用它,只需使用:

daemon myscript args

这应该适用于大多数发行版,但默认情况下可能不会安装.