my $knoten     = $ref_wurzel;