Re^4: avoiding a race ("No extra", "no-user" locking--miniscule race of no importance)


The stupid question is the question not asked
	PerlMonks

by Kanji (Parson)

on Sep 28, 2010 at 20:17 UTC ( #862496=note: print w/replies, xml )

Need Help??

If I knew how to do open(CREATE_NEW(*)) in Perl,

Assuming NFS isn't involved, you could do that with sysopen (or IO::File):-

use Fnctl; # O_* constants
sysopen(FH, $file, O_CREAT|O_EXCL);
[download]

--k.

Comment on Re^4: avoiding a race ("No extra", "no-user" locking--miniscule race of no importance) Download Code

Log In^?

Domain Nodelet^?

Node Status^?

node history
Node Type: note [id://862496]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others studying the Monastery: (9)

As of 2023-12-11 12:33 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

Notices^?