Zufallswahl aus einer Liste

[Chrisman]

Hi,

ich habe folgendes Problem - Hintergrund:

• Alle Text-Dateien eines Verzeichnisses werden ausgelesen.
• Jetzt wird innerhalb jeder Text-Datei eine Zeile ausgelesen, die eine Zahl enthält.
• Sobald diese Zahl größer als 0 ist, wird der Name der Datei ans Ende von @liste gehängt.

Ich will nun zufällig eine Datei aus dieser Liste auswählen lassen. Wie geht das?

Wäre genial, wenn mir jemand helfen könnte!

[Ted]

Hi,

ich habe folgendes Problem - Hintergrund:

• Alle Text-Dateien eines Verzeichnisses werden ausgelesen.
• Jetzt wird innerhalb jeder Text-Datei eine Zeile ausgelesen, die eine Zahl enthält.
• Sobald diese Zahl größer als 0 ist, wird der Name der Datei ans Ende von @liste gehängt.

Ich will nun zufällig eine Datei aus dieser Liste auswählen lassen. Wie geht das?

Wäre genial, wenn mir jemand helfen könnte!

Hi Chrisman,

versuch mal:

@Beispiel = ('1','2','3','4'); # Deine Liste

srand();
$zufall = int(rand($#Beispiel+1));

print $Beispiel[$zufall];

Das sollte klappen. Oder in Deinem Fall könnte es heißen:

$auswahldatei = $Beispiel[$zufall];

Ich denke, ab hier weißt Du weiter, oder?

Grüße
Ted

[Chrisman]

Hi Chrisman,

versuch mal:

@Beispiel = ('1','2','3','4'); # Deine Liste

srand();
$zufall = int(rand($#Beispiel+1));

print $Beispiel[$zufall];

Das sollte klappen. Oder in Deinem Fall könnte es heißen:

$auswahldatei = $Beispiel[$zufall];

Ich denke, ab hier weißt Du weiter, oder?

Grüße
Ted

Hi Ted,

hey danke! Es klappt ;)
Thx

Chrisman

[Ted]

Hi Chrisman,

versuch mal:

@Beispiel = ('1','2','3','4'); # Deine Liste

srand();
$zufall = int(rand($#Beispiel+1));

print $Beispiel[$zufall];

Das sollte klappen. Oder in Deinem Fall könnte es heißen:

$auswahldatei = $Beispiel[$zufall];

Ich denke, ab hier weißt Du weiter, oder?

Grüße
Ted

Hi Ted,

hey danke! Es klappt ;)
Thx

Chrisman

Hi Chrisman,

keine Ursache, fein, daß es klappt.

Ted