Help for this page

Select Code to Download

Select or download this

use MIME::Base64;
use MIME::QuotedPrint;
...
} else {
 $body = $mail->body;
}