Quote

Anscheinend gibt es keine methode Neu in deinem baum.pm.
Wobei ich das auch Baum.pm nennen würde.

1
2
3
4
5
6
7
8
9

sub Neu {
   my $class = shift;
   my $self  = {};
   bless( $self, $class );

   my @liste = @_;
   $self->{'ref_wurzel'} = newtree (\@liste);
   return $self;
}

Quote

Deine Neu Methode sollte doch eigentlich ein Object zurücklieferen, keinen Array.
Und hinzufuegen wird wohl auch keine Klassenmethode sein, oder?
Genauso wenig wie ausgabe.
Bei allen 3 Methoden aufrufen hast du übrigens eine lexikalische Variable - @erstellebaum - in dem scope deiner Subroutine erstellt, welche den Rückgabewert bekommt und direkt danach vernichtet wird. Dass wolltest du bestimmt nicht.