foreach my $immed ( @{$immed_child{$root}} )  {
        get_descends($immed);
        $all_descends{$immed}++;
    }