note that the return value of fork() is always defined. Errors are signalled by returning -1.

Which version of Perl is this? I've just checked the documentation for 5.6.0, 5.8.0, and 5.5.3, and they all claim to return undef on failure.