Thread Random generator (24 answers)
Opened by frodus at 2006-03-23 12:01

esskar
 2006-03-23 21:23
#64026 #64026
User since
2003-08-04
7321 Artikel
ModeratorIn

user image
schön ist auch folgender test

Code: (dl )
1
2
3
4
5
6
7
my %seen = ();
$ARGV[0] ? srand(time) : srandom(time);
for (1 .. 10000000) {
my $r = $ARGV[0] ? rand() : random();
die "$_" if exists $seen{$r};
$seen{$r} = 1;
}


somit kann man feststellen, ab wann random wieder von vorne anfängt. rand fängt zwar nicht wieder von vorne an, produziert aber schneller eine kollision.

View full thread Random generator