equivalant du 2>/dev/null en perl

Bonjour,

Je lance une commande perl (ou je teste un répertoire).
Cependant si celui ci n'existe pas, au lieu de renvoyer une erreur, je souhaiterai qu'elle soit rediriger vers un fichier comme sous unix, ainsi le message d'erreur ne s'affiche pas.

Ou tester si mon répertoire existe ou pas

Merci

Je ne comprends pas bien : qui génère l'erreur sur STDERR ?
Ton script ?
Un module que tu ne génères pas ?

Si c'est ton script, tu peux simplement filtrer cet affichage à l'aide d'un test.
Si c'est un module que tu ne maitrises pas, il faut capturer l'exception à l'aide de la construction eval { ... }.
Voir la doc sur les captures d'exception :

Code:

---

perldoc -f eval

---

en fait dans un script perl, j'ai deux solutions pour créer mon répertoire sous windows.

Citation:

---

system ("md $repertoire 2>NUL ");

#ou
mkdir ($repertoire, 0777);

---

si mon repertoire existe déjà, je ne veux pas avoir de retour d'erreur.
ors lorsque j'interroge le coderetour par $?, j'ai toujours 255.

Comment puis je faire pour ne pas générer d'erreur, lors de ce test.

Merci

Code:

---

1 2 3 4 5

my $repertoire = "/home/vince2005/temp"; # création du répertoire s'il n'existe pas unless ( -d $repertoire) { mkdir($repertoire, 0777); }

---

Voilà

NB: Apprenez à être clair dans vos demandes.

Merci

Pour compléter la solution de Djibril, je dirais qu'il faut ajouter un test sur la création dans le cas où le répertoire ne peut pas être crée (problème de droits, chemin farfelu etc.) pour ne pas avoir de surprise dans la suite du script. Ou si tu ne veux vraiment aucun message d'erreur, attribue une valeur à un booléen que tu testes après...

Code:

---

1 2	mkdir($repertoire, 0777) or die "Erreur creation : $!\n\n";

---