You can do the old-style:

    $SIG{INT}= sub { ... };
[download]

It is a pre-forking server,

Um, Win32 doesn't support fork(). Perl 5.6.0 has "fork() emulation" which is pretty buggy still. I think your cookbook recipe is going to require some major reworking.

If I was doing this, I'd replace all of the uses of fork() with appropriate system() calls (or perhaps Win32::Process stuff to keep everything in the same console window) and I'd drop the $SIG{INT} stuff altogether.