for(;;) { sleep(1); } [download]
while(sleep(1)) { } [download]
In reply to Re: How to prevent Perl from exit when SIGUSR1 recieved? by repellent in thread How to prevent Perl from exit when SIGUSR1 recieved? by cmyker