[PERL] Ecrire dans une log en PERL
Résolu
lefreeman63
Messages postés
136
Date d'inscription
Statut
Membre
Dernière intervention
-
lefreeman63 Messages postés 136 Date d'inscription Statut Membre Dernière intervention -
lefreeman63 Messages postés 136 Date d'inscription Statut Membre Dernière intervention -
Bonjour tous le monde,
Je suis en train de mettre en place un petit script en perl, et je cherche en faite à mettre le plus de log possible dedans.
Au début de mon script principal j'ouvre bien mon fichier de log dans lequel je viens écrire au fur et à mesure.
Sauf que dans ce script je viens appeler un script PERL extérieur qui effectue un certain nombre d'action que j'aimerai tracé dans la même log.
En shell je sais qu'il existe la commande
Mais en PERL je ne vois pas comment récupérer les infos de ce script pour les ajoutées dans ma log.
E-ce que quelqu'un aurait une merveilleuse idée pour moi svp???
:-))
Merci d'avance.
Je suis en train de mettre en place un petit script en perl, et je cherche en faite à mettre le plus de log possible dedans.
Au début de mon script principal j'ouvre bien mon fichier de log dans lequel je viens écrire au fur et à mesure.
Sauf que dans ce script je viens appeler un script PERL extérieur qui effectue un certain nombre d'action que j'aimerai tracé dans la même log.
En shell je sais qu'il existe la commande
TEEqui me permet de récupérer ces infos.
Mais en PERL je ne vois pas comment récupérer les infos de ce script pour les ajoutées dans ma log.
E-ce que quelqu'un aurait une merveilleuse idée pour moi svp???
:-))
Merci d'avance.
A voir également:
- Perl log
- Vpn no log - Guide
- Denon perl pro test - Accueil - Audio
- View rescue log - Guide
- Log freebox - Forum Freebox
- Log crash windows - Guide
1 réponse
Salut,
A ta place, je ferais simplement une fonction Ecrire_Log, à laquelle tu passes les infos que tu veux (par exemple le type de log (erreur, debug, warning ..), la date et l'heure, et un message). Tu appelles cette fonction chaque fois que tu veux ecrire dans ton fichier de log.
Dans cette fonction, tu vas simplement ouvrir ton fichier de log (précédemment spécifié), et y ajouter le message.
Tu peux donc également créer une autre fonction, te permettant de préciser le fichier de log qui seras utilisé par ta Ecrire_Log. Le plus simple étant de créer une librairie contenant ces fonctions standards, et de l'importer dans tes scripts.
A ta place, je ferais simplement une fonction Ecrire_Log, à laquelle tu passes les infos que tu veux (par exemple le type de log (erreur, debug, warning ..), la date et l'heure, et un message). Tu appelles cette fonction chaque fois que tu veux ecrire dans ton fichier de log.
Dans cette fonction, tu vas simplement ouvrir ton fichier de log (précédemment spécifié), et y ajouter le message.
Tu peux donc également créer une autre fonction, te permettant de préciser le fichier de log qui seras utilisé par ta Ecrire_Log. Le plus simple étant de créer une librairie contenant ces fonctions standards, et de l'importer dans tes scripts.
Le problème est que le sous script perl que j'appel ne m'appartient pas et il est standart si je puis dire...
donc je ne peux pas le modifier et importer cette fonction dans le sous script
:-(
Je ne sais pas si c'est possible sans modifier le script en lui même.
perl ton_script.pl 1>log.txt 2>erreur.txt
Comme ça, tu rediriges les messages sortie sur STDOUT (sortie standard) vers log.txt et les messages de STDERR (sortie d'erreur standard) vers erreur.txt. Il te suffit alors de spécifier le fichier de log que tu veux.