Schrift
Wiki:Tipp zum Debugging: use Data::Dumper; local $Data::Dumper::Useqq = 1; print Dumper \@var;
[thread]7252[/thread]

Zufallszahlen generieren (Seite 2)



<< |< 1 2 3 4 5 >| >> 44 Einträge, 5 Seiten
docsnyder
 2005-09-13 19:00
#57634 #57634
User since
2005-09-08
300 Artikel
BenutzerIn
[Homepage] [default_avatar]
[quote=pKai,13.Sep..2005, 16:56][quote=J-jayz-Z,13.Sep..2005, 16:29][quote=docsnyder,13.09.2005, 15:34]...[/quote]
Okay, stimmt.[/quote]
Nein, hat den gleichen defekt, wie vayus Ansatz.[/quote]
Gleicher Defekt??? Mein Code produziert keine doppelten Zufallszahlen. ;o)

Gruß, Doc
pKai
 2005-09-13 19:08
#57635 #57635
User since
2005-02-18
357 Artikel
BenutzerIn
[default_avatar]
Was sollte ihn davon abhalten?

Setze mal $maxNumber nicht so hoch über 10 und er macht das sogarfast bei jedem Lauf.

Edit: Variablennamen korrigiert\n\n

<!--EDIT|pKai|1126624536-->
I sense a soul in search of answers.
pKai
 2005-09-13 19:21
#57636 #57636
User since
2005-02-18
357 Artikel
BenutzerIn
[default_avatar]
OK, jetzt weiß ich worauf du hinaus willst.
Dann solltest du aber wohl auch nicht den Auswahlindex, sondern die zugehörige Zahl ausgeben.
Dann passt es und du hast Recht!

Edit: Rechtschreibung\n\n

<!--EDIT|pKai|1126624984-->
I sense a soul in search of answers.
docsnyder
 2005-09-13 20:13
#57637 #57637
User since
2005-09-08
300 Artikel
BenutzerIn
[Homepage] [default_avatar]
[quote=pKai,13.Sep..2005, 17:21]OK, jetzt weiß ich worauf du hinaus willst.
Dann solltest du aber wohl auch nicht den Auswahlindex, sondern die zugehörige Zahl ausgeben.
Dann passt es und du hast Recht!

Edit: Rechtschreibung[/quote]
Oops, ja pKai, Du hast Recht, ich gebe ja die falsche Zahl aus! Aber gut gemeint war's ;o)

Gruß, Doc
pq
 2005-09-13 23:05
#57638 #57638
User since
2003-08-04
12209 Artikel
Admin1
[Homepage]
user image
hier mal die perlishe kurzfassung:
Code: (dl )
1
2
3
4
5
6
7
8
my $max=15;
my $n=10;
my @numbers = 0..$max-1;
for (1..$n) {
 my $i = rand @numbers;
 print $numbers[$i];
 splice @numbers, $i, 1;
}
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:Wie frage ich & perlintro Wiki:brian's Leitfaden für jedes Perl-Problem
esskar
 2005-09-13 23:43
#57639 #57639
User since
2003-08-04
7321 Artikel
ModeratorIn

user image
die idee ist gut
pq
 2005-09-14 00:00
#57640 #57640
User since
2003-08-04
12209 Artikel
Admin1
[Homepage]
user image
[quote=esskar,13.09.2005, 21:43]die idee ist gut[/quote]
stammt ja von docsnyder
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:Wie frage ich & perlintro Wiki:brian's Leitfaden für jedes Perl-Problem
docsnyder
 2005-09-14 00:45
#57641 #57641
User since
2005-09-08
300 Artikel
BenutzerIn
[Homepage] [default_avatar]
[quote=pq,13.Sep..2005, 22:00][quote=esskar,13.09.2005, 21:43]die idee ist gut[/quote]
stammt ja von docsnyder[/quote]
Yep, die Idee iss von mir (aber erfunden hab ich's auch nicht)! Aber irgendwie scheint jeder Code nur dann zu verstehen, wenn er "perlish" genug formuliert ist und nicht etwa C-like durch einen, dem C zur Muttersprache geworden war, bevor er Perl kennenlernte.

Aber nun zum Punkt: Ist es nicht wünschenswert, ein bißchen mehr "Lesbarkeit" zu pflegen als Perl es erlaubt? Ich benutze z.B. "@_" nicht, sondern weise immer an Variablen mit sprechenden Namen zu. Das bringt mehr Transparenz, oder etwa nicht?

Sicher trete ich hier bestimmt eine Fundamentaldiskussion los, aber ich finde, man muß Code auch lesen können (nicht nur der Erzeuger selbst, sonder auch die Pfleger). Und da ist mir keine Zeile zuviel. Als abschreckendes Beispiel: ich mußte mal ein Programm ändern, in dem portugiesische Kommentare drin waren. Die hätte sich der Coder ebensogut sparen können. Und genauso verhält es sich meiner Meinung nach mit Code: er muß lesbar sein!

Bin auf eure Antworten gespannt!

Gruß, Doc
esskar
 2005-09-14 01:15
#57642 #57642
User since
2003-08-04
7321 Artikel
ModeratorIn

user image
ich meinte ja auch die idee.
nicht pq's interpretation davon. :)

doc:
ich komme auch von C bzw. C++ und programmiere auch mehr darin als in Perl.
zum stil: da stimme ich dir auch zu: aber
Code: (dl )
my @numbers = 0..$max-1;
ist schneller als die for-schleife und da dieses construkt zu perl gehört, kann man es verwenden, ohne die lesbarkeit zu schmällern.
docsnyder
 2005-09-14 01:32
#57643 #57643
User since
2005-09-08
300 Artikel
BenutzerIn
[Homepage] [default_avatar]
[quote=esskar,13.Sep..2005, 23:15]ich meinte ja auch die idee.
nicht pq's interpretation davon. :)

doc:
ich komme auch von C bzw. C++ und programmiere auch mehr darin als in Perl.
zum stil: da stimme ich dir auch zu: aber
Code: (dl )
my @numbers = 0..$max-1;
ist schneller als die for-schleife und da dieses construkt zu perl gehört, kann man es verwenden, ohne die lesbarkeit zu schmällern.[/quote]
Ja esskar, Du hast völlig Recht, wir schwimmen da auf einer Linie!
<< |< 1 2 3 4 5 >| >> 44 Einträge, 5 Seiten



View all threads created 2005-09-04 16:55.