sub AusgabeBaum { if (defined(my $knoten = shift)){ if (defined($knoten->{'linksweg'})) { AusgabeBaum($knoten->{'linksweg'}); } print $knoten->{'zahl'}; print " "; if (defined($knoten->{'rechtsweg'})) { AusgabeBaum($knoten->{'rechtsweg'}); } } }