Flock unter W95 ignorieren?

[Beat Strasser]

Hallo

Gibt es vielleicht irgendeine Möglichkeit, das zu umgehen, so in der Art von if ($ENV{'betriebssystem'} != Windows&Co) {flock (FH,2)} oder (noch besser :-) if (flock () is supported) {do something}...

Vielleicht funktioniert das:

$LOCK_EX = 2;
  $LOCK_UN = 8;
  ($0 =~ /\/) ? $db_use_flock = 0 : $db_use_flock = 1;
  
  #...
  
  flock(FILE, $LOCK_EX)  if($db_use_flock);

Gruss,
Beat