Discussion :

[goblin]

Je cherche comment rediriger les messages d'erreur vers un programme

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
BEGIN {
 
     use CGI::Carp qw(carpout);
     open(LOG, ">>erreurs.txt")
     or die "Unable to append to erreurs.txt : $!\n";
     carpout(*LOG);
}

Comment faire pour rediriger les erreurs vers mon programme traitement_erreurs() ????

[Jedai]

Un programme ou une fonction (attention écrire machin() sous-entend que machin est une fonction) ?
S'il s'agit d'un programme, on peut utiliser une forme de open pour ouvrir un pipe vers ce programme :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
open ERROR, '|-', 'traitement_erreur' or die "... : $!\n";

--
Jedaï

[goblin]

Oui il s'agit d'une fonction de mon, soft

[Jedai]

Tu peux utiliser $SIG{__DIE__} probablement. Regarde dans "perldoc perlvar" pour plus de détails.

--
Jedaï