Демонизацифя в perl

[13th]

Всем привет. решил начать осваивать perl. Начал с написания демона. В интернете нашел 2 варианта решения проблемы
1) используем уже написанный модуль демон(тема ветки)
2) пишем сами


Скопировал код первого и второго решения. Если второй вроде как удачно запускается и даже отвечает, то первый вариант тупит.

Код:


#!/usr/bin/perl

#print "Content-type: text/plain; charset=iso-8859-1\n\n";
use CGI;
use CGI::Carp qw(warningsToBrowser fatalsToBrowser);

use strict;
use warnings;

use Proc::Daemon;
use Proc::PID::File;


print "helllllo \n\n";

# Daemonize
Proc::Daemon::Init or die "Can't redi!";


print "hello \n\n";


После попытки демонизации скрипт как бы умирает, то есть нет вывода второго "hello".

Запускал по ssh из под рута. Скрипт сам находится в папке пользователя.