my $kid = fork;
     die "Dammit, I must be sterile." unless defined $kid;