Select Code to Download

$smtp->datasend('Content-Type: multipart/mixed; boundary="--*B*--"\n\n
+');

$smtp->datasend(qq{Content-Type: multipart/mixed; boundary="--*B*--"\n
+\n});