Help for this page
use Fcntl ':flock' ; open(ONE, ">>C:\\temp\\RTEOlock.log") ; ... flock(ONE, LOCK_UN) ; close ONE ;
use Fcntl ':flock' ; open(OUT, ">>C:\\temp\\RTEOlock.log") ; flock(OUT, LOCK_EX) ; ...