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);
--k.
In reply to Re^4: avoiding a race ("No extra", "no-user" locking--miniscule race of no importance)
by Kanji
in thread avoiding a race
by westy032001
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |