kann man unlock grunsätzlich ausschliessen?

[Alain]

hallo, kann man unlock grunsätzlich ausschliessen,wenn ein file geschlossen wird?

siehe Bsp.: #opening/closing sub fileopen {         local($f,$mode) = @;         if ($isdbfile){$res= dbmopen(%FILE,$f,0666);}         else {$res= open(FILE,"$mode$f");}         &lock();         return $res; } sub fileclose {         local($f) = @);         &unlock();         if ($isdbfile){$res= dbmclose(%FILE);}         else {$res= close(FILE);}         return $res; } #' locking/unlocking sub lock {         local($mode)=@;         flock(FILE,2);         seek(FILE, 0, 2) if (!$isdbfile && $mode eq '>>'); } sub unlock {flock(FILE,8);}

Grüsse vom Alain-- ...nichts ist so schlecht, als daß es nicht für irgend etwas gut wäre