Re: [TECH] Escaper des accents en Perl

[Raphaël FLORES <raf64flo AT hotmail.com>]

Je ne suis pas certain d'être dans le vrai, mais ces pages 
pourraient-t-elles t'aider ?

http://cpan.uwinnipeg.ca/htdocs/libwww-perl/HTTP/Headers/Util.html

Puis sinon :
http://www.alianwebserver.com/informatique/languages/perl/mail.htm
http://perldoc.perl.org/Encode.html
http://userpage.fu-berlin.de/~ram/pub/pub_jf47ht72Ht/perl_unicode_en

Si oui tant mieux, sinon. Désolé de te faire perdre ton temps...

Bonne journée.

Frederic Couchet a écrit :
> Salut,
>
> une question sur Perl et la manière d'escaper les accents.
>
> J'utile un petit script Perl pour faire des mailings. Dans les
> en-têtes il faut escaper les accents sinon les MUA essaient de
> deviner, et s'en sortent pas forcément bien. En outre, spamassassin
> détecte ce genre de problème et peut scorer positivement le mail (pas
> assez pour le faire passer pour un spam avec juste ça).
>
> Exemple.
>
> Une ligne d'en-tête incorrecte :
>
> $smtp->datasend("Subject: Promouvoir et défendre le logiciel libre : campagne de parrainage \n");
>
> Une ligne d'en-tête avec l'accent escapé (man iso_8859-1) :
>
> $smtp->datasend("Subject: Promouvoir et =?iso-8859-1?Q?d=E9fendre?= le logiciel libre : campagne de parrainage \n");
>
> Comment faire ça automatiquement via une fonction Perl (si ça existe) ?
>
> Fred.
>

---

Plus de 15 millions de français utilisent Windows Live Messenger !  Téléchargez Messenger, c'est gratuit !