nicht angemeldet
Hallo.
Ich habe folgendes Problem:
Ich habe eine Datei mit Namen. Das Perl-Script soll mir den Namen aus der Datei suchen, der in $eingabe angegeben ist.
Wenn in der Datei mailadress.txt nur ein Eintrag vorhanden ist, ist das auch kein Problem, aber sobald mehr als ein Eintrag in der Datei ist, funktioniert es nicht. Jeder Name ist auch eine einzelne Zeile in der Datei.
Über ein rasche Hilfe würd ich mich sehr freuen.
Christof
my $eingabe = 'christof';
open(DATEI, "<mailadress.txt") || die "Datei nicht gefunden";
my @Zeilen = <DATEI>;
close(DATEI);
$gefunden='false';
foreach(@Zeilen) {
if ($_ eq $eingabe) {
$gefunden='true';
}
}