Opened by Pasta at 2011-11-12 16:43
User since
2011-11-12
5 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2011-11-12
5 Artikel
BenutzerIn
Hallo,
ich habe nicht so ganz die Perl-Erfahrung, dennoch habe ich mich im Forum etwas über die Arrayübergabe informiert und auf vielen anderen Seiten auch.
Ich bekomme die Übergabe weder mit Referenzierung / Dereferenzerung noch mit normaler Übergabe hin. Es wäre echt hilfreich wenn mir jemand zeigen könnte, wo die Fehler liegen.
Zum Programm: Es geht um Primzahlenzerlegung. Ich habe einen vorher gefüllten Array (mit den Primzahlen der Zahl, die Zerlegt wurde), der dann an meine Methode Output übergeben wird:
Die Ausgabe soll dann so aussehen:
2*2*2*3*17*17
Last edited: 2011-11-12 16:52:22 +0100 (CET)
ich habe nicht so ganz die Perl-Erfahrung, dennoch habe ich mich im Forum etwas über die Arrayübergabe informiert und auf vielen anderen Seiten auch.
Ich bekomme die Übergabe weder mit Referenzierung / Dereferenzerung noch mit normaler Übergabe hin. Es wäre echt hilfreich wenn mir jemand zeigen könnte, wo die Fehler liegen.
Zum Programm: Es geht um Primzahlenzerlegung. Ich habe einen vorher gefüllten Array (mit den Primzahlen der Zahl, die Zerlegt wurde), der dann an meine Methode Output übergeben wird:
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
...
@primfaktoren = (2,2,2,3,17,17); #Bei der Zahl 6936 sieht der Array dann so aus
ausgabe (@primfaktoren);
sub ausgabe
{
@primfaktoren = $_[0];
my $counter2 = 0;
my $counter1 = 0;
$counter1 = $#primfaktoren; #Arraylänge
while ($counter2 < $counter1)
{
print ($primeFactors[$counter2] . "*");
$counter2++;
}
print ($primfaktoren[-1]); #Ausgabe der letzen Stelle des Arrays, damit das Malzeichen am Ende nicht nocheinmal steht.
}
Die Ausgabe soll dann so aussehen:
2*2*2*3*17*17
Last edited: 2011-11-12 16:52:22 +0100 (CET)