eine Frage zu objektorientertem Perl - #75920 (Allgemeines zu Perl)

renee

2007-04-18 12:19

User since
2003-08-04
14371 Artikel
ModeratorIn

[quote=ASDS,18.04.2007, 10:15]Muss ich denn hier

Code: (dl )

1
2
3

sub ausgabe {
   my $self = shift;
   my $knoten = undef;

auch sagen, dass

Code: (dl )

 my $knoten     = $ref_wurzel;

ist?[/quote]
der erste Knoten ist ja dein $self, also musst Du da alle $knoten durch $self ersetzen...