Демон на перле

да точно так же как и на C:
$SIG{HUP} = IGNORE;
if ( fork != 0 ) { exit 0; }
POSIX::setsid;
chdir "/";
umask 0;
close STDIN;
close STDOUT;
close STDERR;
if ( fork != 0 ) exit 0;