Discussion :

[cosquall]

Bonjour à tous je suis nouveau sur le site donc petite présentation.
Alors je suis en ce moment en alternance pour mon M2 réseaux (et système) et au boulot on me demande de faire un script de statistique sur le mail log donc jusque la ca marche.
Cependant j'ai un problème lorsqu'un envoie à plusieurs destinataires exemple :

Aug 9 14:49:59 newmail clamsmtpd: 46540F: from=A@A.com, to=X@X.com, to=Y@Y.com, to=Z@Z.com, status=CLEAN

Par exemple dans cette ligne mon script va récupérer les infos $envoie=A@A.com $dest=X@X.com et je n'arrive pas a trouver comment récuperer les autres.

Voila un extrait de mon script:

Code :

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

1
2
3
4
elsif($_ =~/status=CLEAN/){        
        if($_ =~/from=([^,]+),\sto=([^,]+),/){
            $fromAdr=$1;            
            $toAdr=$2;

Et du coup je suis un peu bloqué si quelqu'un pouvais m'aider je vous remercie d'avance

Anthony

[Philou67430]

Tu peux le faire ainsi :

Code :

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

1
2
3
my ($from, @to) = /(?:from|to)=([^,]+),\s*/
if ($from && @to) {
}

mais ceci suppose que la ligne de log commence toujours par un seul from, et est suivie par un ou plusieurs to.

Une autre manière d'aborder la chose est d'extraire les couples "from/to" avec l'adresse, et de construire, en les splittant, une structure de donnée contenant tous les from et to lus.

Code :

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

1
2
3
4
5
my %mail;
map { my ($field, $val) = split /=/; push @{$mail{$field}}, $val } /((?:from|to)=[^,]+),/g;
if (@{$mail{from}} && @{$mail{to}}) {
  # ...
}

Personnellement, je préfère la deuxième approche, qui est plus sûre.
Il y aurait encore des tas d'autres solutions, comme celle d'extraire les to en match tout depuis "to=" jusqu'à (non inclu) "status=", et en découpant après coup.

[cosquall]

Merci pour la réponse philou j'essaie ca et te tiens je viendrai au rapport pour dire si je m'en suis sortie !!!
Encore merci

Edit: Bon bah nickel franchement en fait j'avais essayé un truc qui ressemblait un peu mais je n'utilisais ni map ni push j'avais fais un truc un peu crade avec split qui de toute facon ne marchait pas en tout cas merci à toi je peux finir mon script