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
hm und was GEANU ist da falsch
hier die Methode, aber nachdem ich nicht genau weiß, was er mir mit diesem Fehler sagen will....weiß ich nicht so recht wo ich suchen soll....
SO hab ich das gerade aber NICHT formatiert...das schaut ja schrecklich aus...\n\n
<!--EDIT|ASDS|1176818521-->
hier die Methode, aber nachdem ich nicht genau weiß, was er mir mit diesem Fehler sagen will....weiß ich nicht so recht wo ich suchen soll....
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
sub newtree {
######################
# Erstellen des Trees
my $ref_liste1 = shift;
my $zahl = undef;
my $ref_wurzel = undef;
for my $zzahl (@$ref_liste1){
my $refvalue = $ref_wurzel;
if ($zahl)
{ while (1) {
############################
#Beginn des Vergleichs
if($zzahl < $$refvalue{'zahl'}) {
if(defined($$refvalue{'linksweg'}))
{
$refvalue = $$refvalue{'linksweg'};
}
else {
$$refvalue{'linksweg'} = knot($zzahl);
$zahl = $ref_wurzel;
last; #Ende
}
}
#wenns Links nicht mehr weiter geht, geh rechts weiter
else { if ($zzahl > $$$refvalue {'zahl'}) {
if(defined($$refvalue{'rechtsweg'}))
{
$refvalue = $$refvalue{'rechtsweg'};
}
else {
$$refvalue{'rechtsweg'} = knot($zzahl);
last;
}
}
}
}
}
}
return($ref_wurzel);
}SO hab ich das gerade aber NICHT formatiert...das schaut ja schrecklich aus...\n\n
<!--EDIT|ASDS|1176818521-->