rendere processo unkillable

[gianvituzzi]

Salve,

vorrei sapere come rendere il seguente processo un-kill-able, ovvero che non smetta mai di eseguire almeno che non venga riavviato il sistema. Vorrei quindi che fosse immune ad ogni chiamata di kill -1 -9 $pid

Ci sono dei casi in cui il sistema o il kernel riescano a killare un processo??

Grazie

#!/usr/bin/perl

use strict;
use warnings;
use Proc::Daemon;
use Proc::PID::File;

#
# Daemonize..
#

Proc::Daemon::Init;

exit if ( Proc::PID::File->running( dir => "/tmp") );

#
# My task
#

while (1)
{
   &_main();
}