nicht angemeldet
Hi zusammen!
Ich suche eine Möglichkeit in Perl eine zufällige Zeichenkette zu erzeugen, wür die ich jedoch Länge und zulässige Zeichen festlegen kann.
Ich habe mal ein bischen im Archiv gestöbert, und habe dabei folgendes gefunden (http://www.teamone.de/selfhtml/sfarchiv/2000_4/t23286.htm#a119482):
$pword = join'', map { chr($_) } (36..128)[ eval "int(rand(128-36))," x 8 ];
Das klappt auch wunderbar, und die Länge der Zeichenkette kann ich hier ja mit dem '" x n ];´ am Ende anpassen. Aber wie kann ich bestimmen, welche Zeichen enthalten sein dürfen? Ich kann z. B. in einer URL keine Zeichenkette wie "DdcO]Zex" (wurde von o.g. Code erzeugt) gebrauchen.
Für meine URL müsste ich die zulässigen Zeichen also z. B. auf Buchstaben und Zahlen beschränken.
Hat jemand eine Idee?
CU :-)
Stefan