Hi!
Ich hab da ein dummes Problem. Ich möchte n verschiedene (!) Zufallszahlen erzeugen.
Code:
for ($j=0; $j
Spontan fällt mir da nur eine Lösung mit einem Array ein. Alle
Zahlen im Array speichern und vorher abfragen, ob die Zahl
schon in diesem existiert. Das wäre aber ziemlich umständlich,
hat jemand eine andere bessere Lösung?
Fast richtig. Das Zauberwort heißt Hash!
my (%zufall,$X);
$X=100;
while (scalar keys %zufall
cu, holli
ps. srand() muß ab perl5 nicht mehr aufgerufen, und wird in Zukunft nicht mehr unterstützt.
print join("\n", keys %zufall);
Ok, aber ich möchte die Zahlen in einen String einfügen.
Folgendes soll ausgegeben werden
Wie bekomme ich diese Ausgabe nun hin?
Also das ganze dann X mal natürlich, so dass dann da X verschiedene Bildnummern erscheinen…
my (%zufall,$X);$X=100;
while (scalar keys %zufall ’ } @zufall;
print join("\n", keys %zufall);
cu