for($i;$i<2;$i++) { # This would spwan four independent 
        $pid= fork;       #  processes
        Proc::Daemon::Init();
        }