On Friday 14 November 2003 19:24, Edgar Bonet wrote:
> En Perl je ferais un truc du genre (pas testé) :
>
> # Is this an encoded word?
> if (/^(.*) =\? .*? \? (\w) \? (.*?) \?= (.*)$/x) {
>
> # B encoding means base64
> if ($2 =~ /b/i) { $3 = decode_base64($3); }
>
> # Q is quoted-printable
> elsif ($2 =~ /q/i) { $3 = decode_qp($3); }
>
> # Others are unknown
> else { warn "Unknown encoding type $2\n"; }
>
> # Re-assemble the line
> $_ = "$1$3$4";
> }
Je vais tester ca, mais en python (via les expressions singulieres).
> PS : Ils font vraiment c*** les gens qui programment des mailers sans
> avoir lu les RFC avant.
Je ne te le fais pas dire... A ce propos, ils n'ont toujours pas corrige le
bug de leurs filtres, a l'ILL (tu sais, quand le contenu d'un Id du header
apparait sur plusieurs lignes, il est coupe au milieu).
--
Frederic
