foreach $zeile (@array) {
# Zeilenumbruch entfernen
chomp $zeile;
# Die einzelnen Elemente zuweise - Liste ist komma-separated, daher /,/
($sex, $name, $email) = split(/,/, $zeile);