Opened by ASDS at 2007-04-10 15:14
User since
2007-01-29
115 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2007-01-29
115 Artikel
BenutzerIn
[quote=GwenDragon,12.04.2007, 13:06]Deine Referenz auf einen Baum sieht doch so aus, oder:
{ zahl => Wert,
linksweg => Referenz auf Knoten
rechtsweg => Referenz auf Knoten
}
$self->{'ref_wurzel'}->{'rechtsweg'} ist der Inhalt von rechtsweg
$self->{'ref_wurzel'}->{'linkssweg'} ist der Inhalt von linksweg
$self->{'ref_wurzel'}->{'zahl'} ist die Zahl[/quote]
so?
schaut aber komisch aus.
{ zahl => Wert,
linksweg => Referenz auf Knoten
rechtsweg => Referenz auf Knoten
}
$self->{'ref_wurzel'}->{'rechtsweg'} ist der Inhalt von rechtsweg
$self->{'ref_wurzel'}->{'linkssweg'} ist der Inhalt von linksweg
$self->{'ref_wurzel'}->{'zahl'} ist die Zahl[/quote]
so?
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
sub ausgabe {
my $refvalue = shift;
my $self = shift;
if(defined($self->{'ref_wurzel'}->{'linksweg'}})) {
ausgabe($$refvalue{'linksweg'})
}
print "$self->{'ref_wurzel'}->{'zahl'}\n";
if(defined($self->{'ref_wurzel'}->{'rechtsweg'})) {
ausgabe($$refvalue{'rechtsweg'})
}
}
ausgabe($ref_wurzel);