Help for this page
use MIME::Entity; use Mail::Mailer qw(sendmail); ... $email->print(\*STDOUT); $email->send;
Content-Type: multipart/alternative; boundary="----------=_1455820701- +7549-0" Content-Transfer-Encoding: binary ... ------------=_1455820701-7549-0--