Bonjour !
Voilà, j'expose mon probleme.
SOus linux, je dois étudier mon flux de mails.
à chaque mail, dans les log, j'ai la ligne TAUX=X, avec X qui varie de 1 à 100.
donc j'aimerais faire une moyenne de ce taux sur une machine, puis je la lance un autre jour pour vérifier si le taux est bien le meme en gros en moyenne par jour..
Pour ce faire, je pensais faire une expression reguliere avec
ou quelquechose dans ce genre.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 my $dir = $ARGV[0]; if (! opendir( DIR, $dir) ) { print "Warning ! Impossible d'ouvrir le répertoire $dir : $!.\n"; return undef; } my @files = grep !/(?:^\.$)|(?:^\.\.$)/, readdir DIR; closedir DIR; foreach $trouve (@files) { if (-f $dir.$trouve) { ##RECHERCHETEXTE### $SORTIE_SPAMC =~(/taux\/(\d.\d)/); $SCORE=$1; } }
Le probleme, c'est que je ne sais pas :
1- Comment lire dans un fichier qui a du texte qui se rajoute au fur et à mesure ( puisque ce sont des fichiers log )
2- Rechecher du texte dans le fichier, puisque là je n'ai que l'ER
j'ai regardé, j'ai déjà
qui pourrait servir, mais bon, là il me faut savoir comment prendre l'ER justement :/
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 open(OLD, "$Old_Fic") or die("Read Error in $Old_Fic !"); while(<OLD>) { } close(OLD);
et si elle est validée, j'incrément un compteur..
et à la fin je divise la somme des taux par ce compteur pour avoir une moyenne
Merci de bien vouloir m'aider à recoller tous ces morceaux, c'est ptet pas tres clair en plus
Partager