my $Lock = Glck->new($ResName);
    $Lock->lock_mk($ChildPID);