Joinc Wiki: Perl에서 데몬 프로세스 만들기

Facebook Joinc 그룹 Joinc QA 사이트

joinc는 Firefox와 chrome에서 테스트 했습니다. IE에서는 테이블이 깨지거나 이미지가 보이지 않을 수 있습니다. 특히 구글 Docs이미지의 경우 엑박처리될 수 있습니다.

Perl을 이용해서 네트워크 서버 프로그램을 만들어야될 일이 생겼다. 그동안 서버프로그램은 C만을 이용왔다. 이번에도 C를 이용해서 만들려고 했는데, 이게 여러장비로 자동배포되어야될 프로그램인지라 배포관리 차원에서 Perl을 이용하기로 했다.

다음은 perl을 이용해서 daemon 프로세스를 만드는 방법이다. fork한후 부모프로세스를 exit(2) 하고 setsid() 하는 것, 마지막으로 표준입력,표준출력,표준에러를 닫아주는 것 까지 C로 했을 때와 큰 차이는 없다. 하긴 시스템프로그래밍영역이니 언어에 따른 차이가 있을리는 없겠지만.

#!/usr/bin/perl 
use POSIX 'setsid'; 
use Cwd 'chdir'; 
 
sub daemon_init 
{ 
    my $pid = fork; 
    exit 0 if $pid; 
    exit 1 if not defined $pid; 
    setsid(); 
    close $_ for @_; 
} 
 
daemon_init( *STDERR, *STDOUT, *STDIN);

음.. perl은 문법이 참 자유롭단 말이야. 알아먹기 어려운 코드라고 욕을 좀 먹긴 하지만.

뇌자극 QA 뇌자극 에러 및 수정목록 총 페이지 수 : 3224 전체 함수/용어사전 구글검색방법 구글 맞춤검색	Facebook Joinc 그룹 Joinc QA 사이트 현재위치 : 미니사이트>JPerl>daemon_init Tweet joinc는 Firefox와 chrome에서 테스트 했습니다. IE에서는 테이블이 깨지거나 이미지가 보이지 않을 수 있습니다. 특히 구글 Docs이미지의 경우 엑박처리될 수 있습니다. Perl을 이용해서 네트워크 서버 프로그램을 만들어야될 일이 생겼다. 그동안 서버프로그램은 C만을 이용왔다. 이번에도 C를 이용해서 만들려고 했는데, 이게 여러장비로 자동배포되어야될 프로그램인지라 배포관리 차원에서 Perl을 이용하기로 했다. 다음은 perl을 이용해서 daemon 프로세스를 만드는 방법이다. fork한후 부모프로세스를 exit(2) 하고 setsid() 하는 것, 마지막으로 표준입력,표준출력,표준에러를 닫아주는 것 까지 C로 했을 때와 큰 차이는 없다. 하긴 시스템프로그래밍영역이니 언어에 따른 차이가 있을리는 없겠지만. #!/usr/bin/perl use POSIX 'setsid'; use Cwd 'chdir'; sub daemon_init { my $pid = fork; exit 0 if $pid; exit 1 if not defined $pid; setsid(); close $_ for @_; } daemon_init( STDERR, STDOUT, *STDIN); 음.. perl은 문법이 참 자유롭단 말이야. 알아먹기 어려운 코드라고 욕을 좀 먹긴 하지만.