Select Code to Download

  my $msg = MIME::Lite->new(
    From     => $from,
    To       => $to,
    Type     => 'multipart/alternative',
    Subject  => $subject_val,
  );

  my $msg = MIME::Lite->new(
    Type     => 'multipart/alternative',
    Subject  => $subject_val,
  );

  my $msg = MIME::Lite->new(
    Type     => 'multipart/alternative',
    Subject  => $subject_val,
...
    $smtp->data();
    $smtp->datasend($email);
    $smtp->quit();