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 :

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');
L'envoi de mail fonctionne parfaitement.
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