.htuser mit Hilfe von Perl auslesen

[i-netlab]

Hallo,

ich versuche über Perl die Datei .htusers auszulesen. Geht das theoretisch? Ich komme bislang nicht in den absoluten Pfad rein. Ziel ist es, dass die Benutzer ihre Passwörter ändern können.

da hab ich einen guten Tipp:
use Shell qw(htpasswd);

Eingaben ok, nun kann die Passwortdatei geschrieben werden

htpasswd ("-b $passwordfile $uid $password_1");

also das shellkomando htpasswd in einem PERL CGI nutzen.
Die $uid = $ENV{'REMOTE_USER'} somit kann nur der auth. User sein passwort selbst ändern. Der Rest ist Tipparbeit ;-)

Gruß, Rolf

Im Perl-Script steht folgendes:
   open(DATEI,"/.htusers") || die;
an der Stelle bricht er per Fehlermeldung ab (died at line 6).

Die .htusers liegt gleich an der Stelle im absoluten Pfad. In der .htaccess steht folgendes:
  AuthUserFile .htusers
Passwortabfrage usw. funktioniert ohne Probleme.

Vielen Dank für die Hilfe,
Andreas H.