De l'aide pour vos programmes et scripts en Perl

Probleme sysopen sur NT

J'aimerai utiliser la fonction sysopen et profiter de la fonction O_EXCL mail je n'arrive pas à la faire marcher correctement ...*
use fcntl;
---------
$temoinala="D:\\fictemoin.txt";
sysopen(FH, $temoinala, O_RDWR|O_CREAT|O_EXCL) or die "pb sysopen : $!";
---------
Qd le fichier n'est pas créé, j'ai un rc de type "File or Directory doesn't exist ..."
et qd il existe déjà, il me semble de ne pas profiter de la fonction O_EXCL.

Est-ce un pb ou une mauvaise utilisation du sysopen de ma part ?

Merci pour votre aide