Accéder au contenu.
Menu Sympa

technique - RE: [TECH] Escaper des accents en Perl

Objet : Liste pour les discussions techniques (liste à inscription publique)

Archives de la liste

RE: [TECH] Escaper des accents en Perl


Chronologique Discussions 
  • From: alain.coulais AT obspm.fr
  • To: Frederic Couchet <fcouchet AT april.org>
  • Cc: technique AT april.org
  • Subject: RE: [TECH] Escaper des accents en Perl
  • Date: Tue, 20 May 2008 10:28:21 +0200 (CEST)


On 20-May-2008 Frederic Couchet wrote:
> 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) ?
>

je ne suis pas sur d'avoir compris ta question
mais, tel que je la comprends, je vois ca:
http://perldoc.perl.org/Encode.html

Alain




Archives gérées par MHonArc 2.6.16.

Haut de le page