バックグラウンド:
Twitter フィードをダウンロードしてテキスト ファイルに保存しています。Mail::SpamAssassin で perl スクリプトを使用して、スパムの可能性をチェックしたいと考えています。そこで、テキストからのメッセージの読み込みに関するこの投稿をフォローしました。すべてのメッセージは、419 詐欺であっても、if ステートメントで「スパムではない」とマークされ続けます。
質問
- 私は何を間違っていますか?
- Spamasssasin ファイルを構成する必要はありますか?
- メッセージは特定の形式である必要がありますか?
- 私のプロジェクトのためのより良い代替手段はありますか?
詳細:
コード:
use Mail::SpamAssassin;
use strict;
use warnings;
open FILE, "<", ~/Messages/twitter_tweet.ema' or die;
my @lines = <FILE>;
my $spamtest = Mail::SpamAssassin->new();
my $mail = $spamtest->parse(\@lines);
my $status = $spamtest->check($mail);
print $status->get_report();
if ($status->is_spam()) {
print "Totally Spam\n";
} else {
print "not spam\n";
}
$status->finish();
$mail->finish();
$spamtest->finish();
出力:
(レポート テンプレートが見つかりません)
スパムじゃない
ノート:
私はspamAssasinを設定しませんでした.単にperlモジュールを使い始めました.
ホームディレクトリにというファイルがありますが、~/.spamassassin/user_prefs
触れていません