sysopen(FH, $path, O_WRONLY | O_EXCL | O_CREAT);