Hallo zusammen,

unter Perl schreibe ich in eine Textdatei mit den Befehlem OPEN und PRINT. Nun möchte ich nach OPEN den FLOCK Befehl einsetzen:

my $gBSUNIX = 1;
if ($gBSUNIX) {flock($_[0], 2) || die("can't lock file, $!");}

Bis jetzt habe ich immer eine Variable eingesetzt.

Gibt es einen Befehl mit dem man prüfen kann, ob der FLOCK Befehl vom Betriebssystem unterstützt wird?

Danke im voraus