[Perl] Problemas con MIME

[Ing. Roberto Andrade Fonseca]

Hola:

Hice un script usando perl y MIME::Lite, en el cual se ejecuta:

my $msg =3D MIME::Lite->new(
                              From =3D> 'algun@host.com.mx',
                              To   =3D> $ARGS{correo},
                              Subject =3D> 'Sus datos en internet',
                              Type    =3D> 'TEXT',
                              Encoding =3D> 'binary',
                              Data    =3D> $texto
                             );

# Y lo enviamos
$msg->send;

El problema es que a algunos sitios de correo gratuito, en particular en co=
rreoweb.com, llega solamente un chorizo ASCII, no el mensaje que debe llega=
r.

Al ver el header, encuentro que el sendmail de mi m=E1quina hace esto:

  X-MIME-Autoconverted: from 8bit to base64 by mi.host id f5PNJfa02486

Lo curioso es que no a todos los destinatarios les llega mal, solo a alguno=
s, como los de correoweb.com.

El=20
=09Encoding =3D> 'binary',

es un intento m=E1s, ya prob=E9 con 7bit y 8 bit.

=BFAlguna idea?

Saludos,

Roberto Andrade Fonseca
randrade@abl.com.mx