flock funktioniert nicht - #7337 (Perl/CGI)

x-man

2006-04-17 19:44

User since
2003-09-11
67 Artikel
BenutzerIn
[default_avatar]

Mein Provider hat in seinen FAQs ausdrücklich "verboten", flock zuverwenden. Keine Ahnung warum. Ich habe flock trotzdem verwendet. Es gibt keinen Fehler aber wahrscheinlich auch keinen Schutz, denn Dateien, in die häufig geschrieben wird werden ständig leer (Datenverlust).

So habe ich flock verwendet:

Code: (dl )

open(FH,">....") or die $!;
flock(FH, 2);
blabla
flock(FH, 8);
close(FH);

oder auch in einer eigenen Funtion:

Code: (dl )

my $flck = 1; #or 0
sub lock{
    local *FH = shift;
    my $mode = shift;
    flock(FH, $mode) if($flck);
}

und der Aufruf:

&lock(*FH, 2); und &lock(*FH, 8);

edit pq: code-tags hinzugefügt
edit: gwendragon: Smilies deaktiviert\n\n