use POSIX qw(setsid); if (fork()) { exit; } else { setsid; } rest of your code here... [download]
In reply to Re: Infinte perl script - Part 2 by kschwab in thread Infinte perl script - Part 2 by r.joseph