Hallo Michel,
warum nicht so ?
open (FILE,"+<$file") or die # open file
flock(FILE,2); # lock file exclusive
seek (FILE,0,0); # position at start
@records = <LOGFILE>;
... weitere Verarbeitung
seek (FILE,0,0); # position at start
print (FILE @newrecs);
truncate (LOGFILE,tell(LOGFILE));
flock(FILE,8); # release lock
close(FILE);
und in anderen cgis, die nur lesen:
open (FILE,"$file") or die # open file
flock(FILE,1); # lock file shared
... weitere Verarbeitung
viele Grüße Günter