0

MIME::Lite モジュールをインストールした Mac から Perl スクリプトを使用して電子メールを送信しようとしています。基本的なスクリプトを使用してテストしています：

#!/usr/bin/perl

use MIME::Lite;

$msg = MIME::Lite->new(
                 From     =>"abc\@gmail.com",
                 To       =>"xyz\@gmail.com",
                 Subject  =>"Demo",
                 Data     =>"Sent :-):-)"
                 );
$msg->send();

MacBook でメール アカウントを設定済みです。メールを送信できないため、他に確認が必要な場合はご案内ください。

4

2 に答える 2

1

コマンド ラインにシステム コールを使用するだけの時代は終わりました。

mail boss@megacorp.net -s "I QUIT!" < body_of_message.txt

しかし、メールサーバーと対話するように mutt をインストールして構成すると、非常に近いことができます:

mutt -s "I QUIT" boss@megacorp.net < body_of_message.txt

一番難しいのは mutt の設定ですが、それも悪くありません。Mutt Configuration Doc ...または「mutt configure」と使用しているメールサーバーのタイプをグーグルで検索するなど、大量のドキュメントとハウツーがあります。gmail、エクスチェンジなど

そこから、perl で次のようにします。

system("/path/to/mutt", "-s", "I QUIT", "boss\@megacorp.net", ...)
   or die "Could not send Email";
于 2012-08-18T05:42:52.273 に答える
0

このモジュールを使用したことはありませんが、ドキュメントに記載されていることに注意してください

MIME::Lite は、現在のメンテナーによって推奨されていません。Email::MIME や MIME::Entity や Email::Sender など、多くの代替手段があり、おそらく代わりに使用する必要があります。MIME::Lite は引き続き奇妙なバグ レポートを蓄積しており、より良い代替手段が利用可能であるため、大量のリファクタリングを受けていません。他のものを使用することを検討してください。 http://metacpan.org/pod/MIME::Lite

そうは言っても、次のようなことをする必要があるかもしれません

デフォルトの送信方法を指定:

 MIME::Lite->send('smtp','some.host',Debug=>0);
 MIME::Lite->send('smtp','some.host', AuthUser=>$user, AuthPass=>$pass);
于 2012-08-18T15:42:32.620 に答える