Maybe invoke Lotus Notes on the server with Win32::Process::Create, then wait indefinately for it to end (i.e. via $processobject->Wait(INFINITE)). Then, loop back to reinvoke it IF it appears to have died for a reason where you know you can just start it back up again. I.e., if it's dying for a good reason, like because a crucial file has gotten corrupted, then this sort of solution would bring the server to a screeching halt as it goes through an infinite loop of start-crash-start-crash-start-crash. Maybe only restart it depending on the value of Win32::GetLastError.

Disclaimer: I know bupkiss about both Lotus Notes, and Win32 servers. You might want to check out Dave Roth's books and web site; he's written some books on using Perl for Win32 Administration.

-- Frag.