Datei lässt sich nicht öffnen

[Yadgar]

High!

Und gleich das nächste Problem: jetzt habe ich die Benutzernamen und Passwörter in eine externe Textdatei ausgelagert und eine Funktion geschrieben, die diese Textdatei ausliest und als Hash strukturiert... obwohl die Datei eindeutig im selben Verzeichnis wie das Perl-Skript liegt, vom Texteditor problemlos gelesen werden kann und beim Start meines Perl-Programms auch nicht von einem anderen Programm benutzt wird (auch nicht vom Texteditor!), lässt sie sich nicht öffnen, ich bekomme immer die Fehlermeldung "No such file or diretory"!

Hier ist der Code der Funktion:

  
sub worte_initialisieren  
{  
  open (WORTLISTE, "wortliste.txt") || die "Kann Wortliste nicht \x94ffnen: $!";  
  while ($name = <WORTLISTE>)  
  {  
    chomp ($name);  
    $wort = <WORTLISTE>;  
    chomp ($wort);  
    $worte{$name} = $wort;  
  }  
  close (WORTLISTE) || die "Konnte Wortliste nicht schlie\xe1en: $!";  
}