Discussion :

[astrotouf]

salut a tous. je viens d'ecrire un petit script qui me permet de prelever mes emails a partir d'un serveur de courier POP en utilisant le package Net::POP3.
j'ai copie les messages que j'ai recus sur un fichier texte et avant chaque message je trouve environ 31 lignes de champs vraiment inutiles comme par exemple celles la :

Code :

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

1
2
3
4
5
6
User-Agent: SquirrelMail/1.4.10a
MIME-Version: 1.0
Content-Type: text/plain;charset=iso-8859-1
Content-Transfer-Encoding: 8bit
X-Antivirus: avast! (VPS 071111-1, 11/11/2007), Inbound message
X-Antivirus-Status: Clean

qui concerne mon antivirus avast. lorsque je le desactive, X-antivirus disparait.
je voudrai savoir s'il existe un moyen de ne garder que les lignes :
date, subject, To et FROM car c'est vraiment les lignes les plus importantes.

merci de votre aide !!!

[astrotouf]

j'ai pu extraire une structure générale pour les entêtes.
le problème est résolu grâce aux expressions régulières.
Perl est tellement puissant !!!!!!
merci
mise a jour : on peut faire traiter automatiquement les entêtes des messages grâce au package MIME::Parser qui arrive a faire des merveilles.