Bonsoir à tous,
J'ai utilisé le module MIME::Lite dans Perl afin d'envoyer un message simple.
(J'ai choisi ce module car il permet facilement d'envoyer des mails au format HTML et également de joindre des fichiers)
Voici mon code très simple qui m'a servi de test :
L'envoi de mail fonctionne parfaitement.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 #!/usr/bin/perl -w use MIME::Lite; $msg = MIME::Lite->build( From => 'mike.meilleur@free.fr', To => 'mike.meilleur@free.fr', Subject => "Re: Hier soir !", Type => 'TEXT', Encoding => 'quoted-printable', Data => "C'était très bien, je te raconterai..." ); #$msg->attr("content-type.charset" => "iso-8859-15"); $msg->send('smtp', 'smtp.free.fr');
Par contre à la réception du mail, les accents ne s'affichent pas correctement :
C'était trÚs bien, je te raconterai...
J'ai essayé des tas de trucs sans succès.
Avez-vous déjà rencontré ce problème ? Savez-vous comment le résoudre ?
Pour info, j'utilise Perl sur Debian.
Merci
Partager