Brauche einen eindeutigen und zufälligen String...

[rolfrost]

hi,

die IP mit einbeziehen - gute Idee ;-)

Mittlerweile hab ich auch was eigenes gebaut:

=sessions
my @sessions;
my $tests = 100000;
for(1..$tests){
 my @salts;
 my $salt;
 my $zufall;
 my @menge;
 # erzeuge ausgangsmenge
 for("a".."z"){ push @menge, $_ }

# die ausgangsmenge mischen
 shuffle(@menge);

# das zufallswort zusammensetzen
 $zufall =  join "", @menge;

# salts erzeugen
 for("a".."z"){ push @salts, $_ }
 shuffle(@salts);
 $salt = join "", @salts;

# und nun crypten
 $zufall = crypt($salt,$zufall);

# zufallsworte einlesen
 push @sessions, $zufall;
}

teste

my %keys = map{ $_,1}@sessions;
print scalar keys %keys, "\n$tests\n";
=cut

Ist vielleicht ein bischen ACID aber auch bei 100000 tests gibt es keine Duplikate...

Viele Grüße, Rolf