Hatena::ブログ(Diary)

みずぴー日記 Twitter

2010-03-27(土)

デーモンプロセスを作ってみる

| デーモンプロセスを作ってみるを含むブックマーク

30分プログラム、その746。デーモンプロセスを作ってみました。

今まで、デーモン的なプログラムを作りたいときはnohupを使ってごまかしてきました。ただ、そろそろnohupと打つのも面倒になってきたので、ちゃんと調べてみました。

どうやら

あたりがポイントのようです。


使い方

$ perl daemon.pl
create daemon process...

ソースコード

#! /usr/bin/perl
# -*- mode:perl; coding:utf-8 -*-
use strict;
use warnings;
use Data::Dumper;
use POSIX qw(setsid);

my $pid = fork();
if($pid != 0){
    print "create daemon process...\n";
    exit;
}else{
    umask 0;
    chdir '/';
    open STDIN, '/dev/null';
    open STDERR, '>/dev/null';
    setsid;

    while(1){
	print "hello\n";
	sleep 5;
    }
}

参考

トラックバック - http://d.hatena.ne.jp/mzp/20100327/daemon