if ($zahl < 4)
{
       $zahl++;          # increase number of children
       $pid = fork(); # a new child is born. yay :)
       print $pid."\n";
}