my $msg = MIME::Lite->new(
        From    => $my_add,       
        To      => $target_add,   
        Subject => $subject,      
        Type    => 'TEXT',
        Data    => $mssg
    );