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