in reply to Re^4: Encoding for MIME::Lite?
in thread Encoding for MIME::Lite?

I didn't say use MIME::QuotedPrint - I said drop the qp_encode. Set the Encoding to whatever you want as per the docs in MIME::Lite, and the module will handle the encoding for you.

Clint

Replies are listed 'Best First'.
Re^6: Encoding for MIME::Lite?
by Opally (Initiate) on Aug 23, 2007 at 20:09 UTC
    hey, Clint, I'm sooo happy I can ask you about this...

    multipart/alternative cannot use quoted-printable encoding, per MIME::Lite error message I get when I try to do that. My problem is that our MS Exchange server sees a long string of text from my longer forms, >1000 chars, and rejects the email.

    I used to have this same problem with Zen Cart, and solved it by changed the encoding to quoted-printable, but I can't see how to do that with MIME::Lite, using multipart/alternative. The quoted-printable encoding is rejected.

    ---Opally
[reply]
      I haven't tried that for a while, but I don't remember there being a problem with using multipart/alternative with quoted printable encoding.

      That said, why don't you try dropping the encoding completely - MIME::Lite is very good at handling this stuff automatically.

      So try this: 

      
$msg = MIME::Lite->new(
    To      => $email_to,
    From    => $email_of_sender,
    Subject => $email_subject,
    Type    => 'multipart/alternative',
);
             
$msg->attach(
    Type => 'TEXT',
    Data => $email_body
);

$msg->attach(
    Type => 'text/html',
    Data => $email_html
);

$msg->send;

      [download]

      Clint

[reply]
[d/l]
[select]
        I got it solved!!! (apologies if this is duplicate post, not familiar with the structure of this board.)

        I had to move the Encode statement into the attach part, out of the main header.
        $msg = MIME::Lite->new(
     To      =>$form_data{'email'},
     From    =>$email_of_admin,
     Subject =>$email_subject,
     Type    =>'multipart/alternative'
     );
             
$msg->attach(Type => 'text/plain',
     Data    => $email_body
     );

$msg->attach(Type => 'text/html',
     Encoding => 'quoted-printable',
     Data => $email_html
     );
$msg->send;

        [download]


        muchas gracias!!!

        --Opally
[reply]
[d/l]

In Section Seekers of Perl Wisdom