perl - Perl はモジュールなしで Web サーバーに電子メールを送信します

Question

サーバー (email:cms1@melitaplc.com) で監視を行うプログラムを作成し、Web サーバー (smtp.melita.com) に接続されているラップトップ (daniel.saliba@melitaplc.com) に電子メールを送信します。 . ダニエルにメールした後....smtpポートを追加しようとしました. ..

PS私はCPANモジュールをインストールできないため、以下のコードです。

プログラムはエラーなしで実行されますが、電子メールが届きません。

sendEmail("daniel.saliba\@melitaplc.com", "cms1\@melitaplc.com", "ALERT", "This is a  test" );

sub sendEmail
 {
    my ($to, $from, $subject, $message) = @_;
    my $sendmail = '/usr/lib/sendmail';
    open(MAIL, "|$sendmail -oi -t");
            print MAIL "From: $from\n";
            print MAIL "To: $to\n";
            print MAIL "Subject: $subject\n\n";
            print MAIL "$message\n";
    close(MAIL);
 }