Das sollte prinzipiell funktionieren. Ein Fehler ist aber wohl, dass "first.txt" zweimal gebunden wird, einmal an @first und einmal an @fourth. Mein Tie::File zumindest kommt damit klar, das mag aber von der Version abhaengen.

Ich gehe auch davon aus, dass dir bewusst ist, dass mit den shuffle()-Zuweisungen die Dateien auf der Platte geaendert werden! Ich weiss auch nicht, wie effizient ist das ist, sowohl bzgl. Rechenzeit als auch Speicher. Irgendwo muessen die Daten ja vor dem Schreiben zwischengespeichert werden. Jemand Lust zu testen?