Hallo,
siehe Betreff. Mein Versuch mit
=try...
my @sessions;
for (1..60){
my $session = time.$$;
my $salt = int rand 98 + 1;
$session = crypt($salt,$session);
push @sessions, $session;
}
print sort join "\n", @sessions, "\n";
=cut
zeigt jedoch dass es doppelte IDs gibt. Hat jemand einen besseren Vorschlag?
Viele Grüße, Rolf
--
SELFforum - Das Tor zur Welt!
SELFforum - Das Tor zur Welt!