Es gibt die random-Funktion für Zahlen: wie erzeuge ich aber zufällige kleine Buchstaben von a-z? Ich habe diesbezügl. gesucht und nichts gefunden, das mir gut gefällt, wie zB /dev/random oder /dev/urandom auswerten Mit mkpasswd kann ich mir eventuell einen Workaround vorstellen. Was wäre eine einfache Lösung? Al
Am 04.10.2003 um 16:23 schrieb Al Bogner:
Es gibt die random-Funktion für Zahlen: wie erzeuge ich aber zufällige kleine Buchstaben von a-z? [..] Was wäre eine einfache Lösung?
Z.B. diese mit Perl: @c = ("a".."z"); for(1..8) { print $c[rand($#c+1)]; } Und wenn du willst, auch direkt auf der Kommandozeile: perl -e '@c=("a".."z");for(1..8){print $c[rand($#c+1)];}' MfG, Dennis
Am Samstag, 4. Oktober 2003 16:37 schrieb Dennis Stosberg:
Am 04.10.2003 um 16:23 schrieb Al Bogner:
Es gibt die random-Funktion für Zahlen: wie erzeuge ich aber zufällige kleine Buchstaben von a-z?
[..]
Was wäre eine einfache Lösung?
Z.B. diese mit Perl:
@c = ("a".."z"); for(1..8) { print $c[rand($#c+1)]; }
Und wenn du willst, auch direkt auf der Kommandozeile:
perl -e '@c=("a".."z");for(1..8){print $c[rand($#c+1)];}'
Danke, das wäre schon brauchbar. Gibt es auch eine Lösung für zufällig generierte Worte auf der Basis irgendeiner Sprache? BTW es geht hier nicht um Passwörter, sondern um eine Idee temporäre email-Adressen zu erfinden. Al
Am Samstag, 4. Oktober 2003 18:54 schrieb Alexander Veit:
Gibt es auch eine Lösung für zufällig generierte Worte auf der Basis irgendeiner Sprache? BTW es geht hier nicht um Passwörter, sondern um eine Idee temporäre email-Adressen zu erfinden.
Auch wenn es nicht um Passwörter geht, könnte Dir evtl. pwgen weiterhelfen.
Danke, daran hatte ich auch schon gedacht, also zB var=`pwgen -1 --no-numerals` pwgen muß aber dann installiert sein. Mit der bash oder perl-Lösung brauche ich nicht darauf zu achten. Interessant wäre vielleicht doch noch irgendeine Lösung, die Worte aus irgendeiner Sprache zufällig generieren kann. Das könnte man sich leichter merken. Al
Hi! Al Bogner schrieb:
Interessant wäre vielleicht doch noch irgendeine Lösung, die Worte aus irgendeiner Sprache zufällig generieren kann. Das könnte man sich leichter merken.
Al
Wie wärs denn mit ispell oder einem anderen Wörterbuch, Sprache wählbar..... Und dann wieder der Ansatz mit Perl. Wahlweise kannst Du aber auch eine ASCII-Datei aus dem Wörterbuch heraus erstellen lassen (perl, alle Wörter mit 5 bis 7 Zeichen), dann hast Du eine sehr große Ausdwahl und musst auch nicht darauf achten, das ispell (o.ä.) installiert ist... Gruß, Uli
Am Samstag, 4. Oktober 2003 19:15 schrieb Ulrich Klenk:
Al Bogner schrieb:
Interessant wäre vielleicht doch noch irgendeine Lösung, die Worte aus irgendeiner Sprache zufällig generieren kann. Das könnte man sich leichter merken.
Wie wärs denn mit ispell oder einem anderen Wörterbuch, Sprache wählbar..... Und dann wieder der Ansatz mit Perl. Wahlweise kannst Du aber auch eine ASCII-Datei aus dem Wörterbuch heraus erstellen lassen (perl, alle Wörter mit 5 bis 7 Zeichen), dann hast Du eine sehr große Ausdwahl und musst auch nicht darauf achten, das ispell (o.ä.) installiert ist...
Die Logik hört sich gut an. Nur kenne ich mich leider mit Perl nicht gut genug aus, um das zu realisieren. Letztlich würde ich eine Variable in einem Shellscript benötigen. Könnte wer ähnlich var=`perl -e '@c=("a".."z");for(1..8){print $c[rand($#c+1)];}'` eine Syntax in Verbindung mit einem Wörterbuch formulieren? Al
Hallo, Am Sat, 04 Oct 2003, Al Bogner schrieb:
Gibt es auch eine Lösung für zufällig generierte Worte auf der Basis irgendeiner Sprache? BTW es geht hier nicht um Passwörter, sondern um eine Idee temporäre email-Adressen zu erfinden.
==== nur ein quickhack ===== #! /usr/bin/perl -w use strict; my $WORDS = "/usr/dict/words"; my $wordlines = `wc -l $WORDS`; chomp($wordlines); $wordlines =~ s/\s*(\d+).*/$1/; my $seed; open(RANDDEV, "</dev/urandom") or die $!; binmode(RANDDEV); read(RANDDEV, $seed, 4); close(RANDDEV); $seed = unpack("L", $seed); srand($seed); my $line = int(rand($wordlines)); open(WORDS, "<$WORDS") or die $!; my $i = 0; while(<WORDS> && $i++ < $line) {}; print scalar(<WORDS>); close(WORDS); ==== HTH, -dnh -- Sigdashes are like condoms. They work better with a space at the end. -- David Scheidt in asr
participants (6)
-
Al Bogner -
Alexander Veit -
David Haller -
Dennis Stosberg -
Jens Tautenhahn -
Ulrich Klenk