Bonjour,

J'apelle un script perl depuis un shell Unix en redirigeant la sortie standart et erreur vers un fichier.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
perl mon_script.pl > fichier.log 2>&1
J'ai besoin de la sortie ERREUR parce j'utilise la module Log::Log4perl pour créer un descripteur sur cette sortie.

Le problème est que au cours du script, je fais des tests et si l'un d'entre eux ne marche pas, je fais un "Die" du script.
Je voudrais que dans mon fichier de log ne s'écrive pas la ligne de Perl me disant :
Died at /mon_script.pl line 10, <> line 10
Savez-vous comment ne pas afficher ce message?


Une idée que j'ai eue a été de créer un fichier de log temporaire pour écrire les messages qui ne m'intéressent pas dans le fichier Log final.
Depuis ce script j'exécute des commandes unix. Et pour les commandes unix, la redirection est très facile.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
if (`ls /bin/usr/* 2>/tmp/temp.log`)
{
Conmmande;
}
Est-ce que je peux comme avec linux rediriger la sortie erreur de Perl vers ce fichier de log???

Merci par avance
MAt