Bonjour tout le monde,

Je vais appelle à vos connaissance car je suis en train de chercher les commande qui permette d'ajouter un des pièces jointes à un mail via le module NET::SMTP. je sais qu'il y a aussi le MIME::LITE mais vu que je fais une étude entre les deux possibilités, je cherches les petits bouts de code qu'il me manque avec NET::SMTP.

Donc si vous avez une idée de l'équivalent de ce code qui vient de MIME::LITE avec NET::SMTP je suis preneur :
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
18
19
20
21
22
23
24
25
26
27
28
 
use MIME::Lite;
 
my $Message = new MIME::Lite
   From =>'expediteur@site.com',
   To =>'destinataire@site.com',
   Cc =>'copie@site.com, copie2@site.com',
   Bcc =>'copiecachee@site.com',
   Subject =>'Sujet de votre message avec pièces jointes.',
# Le message n'est plus de type text, mais multipart/mixed
   Type =>'multipart/mixed';
# Ajoutez le message (texte ou html)
attach $Message
   Type =>'TEXT',
   Data =>"Contenu de votre message au format texte";
# Ajoutez une image gif
# Path étant les nom et chemin d'origine et Filename le nom de destination du fichier
attach $Message
   Type =>'image/gif',
   Path =>'125it6ra89.gif',
   Filename =>'Logo.gif';
# Ajoutez un document PDF
attach $Message
   Type =>'application/pdf',
   Path =>'licence.pdf',
   Filename =>'licence.pdf';
# de même pour l'ensemble des fichiers...
$msg->send;
Merci d'avance pour le coup de main.

Maxime