hallo,
Wenn du eine Datei zum lesen öffnest, dann solltest du normalerweise einen Shared Lock dazu anfordern. Das bedeutet dann, dass andere Prozesse die Datei auch lesen kann, aber während du am lesen bist kann keiner die Datei verändern.
Im Quellcode einfach ein use Fcntl ':flock'; # import LOCK_* constants
und ein flock FILE, LOCK_SH or die "Locking failed: $!";
direkt nach dem open.
Sieht das dann in etwa so aus?
$Zugriffe = 0; open(FILE,"<$htpasswd") || &Dead('Cannot open file'); flock(FILE,1) || &Dead('Locking failed'); while (<FILE>){ /$username:$crypted/ ? $Zugriffe = $Zugriffe + 1 : $Zugriffe = $Zugriffe; }
close (FILE) || &Dead('Cannot close file');
Besten dank schon jetzt für den tip . Grüsse vom Alain
--
...nichts ist so schlecht, als daß es nicht für irgend etwas gut wäre
...nichts ist so schlecht, als daß es nicht für irgend etwas gut wäre