sub mailme {
   my $message = shift;
   my $sub     = shift;
   my $msg     = MIME::Lite->new(
   From    => 'MAILER-DAEMON root',
   To      => 'UX Team <root>',
   To      => 'operations@xxxx.com',
   Subject => "$sub",
   Type    => 'multipart/related'
   );

   $msg->attach(
      Type     =>'TEXT',
      Data     =>"See attachment!"
   );

   $msg->attach(
      Type        => 'TEXT',
      Disposition => 'attachment',
      Path        => "$message",
      Filename    => "$message"
   );

   $msg->send;
}

mailme($log, $sub);