Wer findet den Fehler?

[Ted]

Hallo Ihr,
In einem Verzeichnis mit Memberdaten ist für jedes Member eine Datei mit Daten nach dem Muster:

[e-mail]

Diese Memberdateien lade ich in eine Liste @members, lasse mir den Dateinamen zeilenweise noch anzeigen (klappt auch), um dann die emailadresse zu "extrahieren" und mir ebenfalls zeilenweise anzeigen zu lassen.
Das allerdings klappt nicht mehr!

Ich find nicht, warum, wer kann helfen?

Hier der entscheidende Part im Script:

foreach $members (@members) {
print "$members<br>";
open (MEMBERFILE, "<$members");
while (<MEMBERFILE>) {
$zei = $_;
@memline = split (//, $zei);
$mail = $memline[2];
print "$mail<br>";
}
}
close (MEMBERFILE);

Danke im Voraus.

Ted