Bonsoir,
J'essaie d'envoyer un mail en perl avec un fichier joint, le mail part très bien tout seul, mais sans fichier joint, dès que j'ajoute le code pour le fj, le mail ne part même plus, et je ne vois pas d'où peut provenir l'erreur.
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 # creation du mail et envoi $msg = MIME::Lite->new( From => 'AAA', To => 'BBBB', Subject => 'YAYAYA', Type => 'text/plain', Data => "Bonjour,\n Veuillez trouver ci-joint bla bla bla."); $msg->attach(Type=>'multipart/x-gzip', Path => "le chemin.../log_20060518280032.csv.gzip", Filename => "log_20060518280032.csv.gzip"); $msg->send;
Le fichier gzip est bien un fichier compressé.
Mais j'ai une question, dans le Path, on doit mettre tout le chemin (/var/html/...) ou directement le nom du fichier ? Et pour le FileName, c'est uniquement le nom que je voudrais faire apparaitre ?
Merci.
Partager