Hallo Zusammen,
ich postete einen ähnlichen Beitrag bereits in einem anderen Forum, und beschloss mich nun auch hier anzumelden um eventuell Hilfe zu bekommen.
ich habe vor einigen Monaten bereits ein PHP-Script zur Auslese und Speicherung der jeweils aktuellesten E-Mails geschrieben, dies vor kurzem in PERL übertragen, da ich SpamAssassin zur Klassifizierung der E-Mails benötige.
Jetzt will ich SpamAssasssin benutzen/einbauen, habe es erfolgreich per CPAN geladen und installiert, aber wenn ich ein Spamassassin:Mail-Object per SpamAssassin:check() oder nur einen Text per SpamAssassin::check_message_text() zum Testen filtern will, bricht das Script bei der Ausführung ohne jegliche Fehlermeldung ab.
Es gibt keine syntaktischen Fehler und ich experimentiere aktuell mit einer DB, gefüllt mit diversen ham/spam Texten.
Ein kleiner Ausschnitt, wie ich mir das gedacht habe, aber es wie gesagt nicht geht, weil wegen weiss ich nicht.
my ($mail, $status, $new_status, $spam);
while(my ($mail_id, $mail_body) = $sth->fetchrow_array ) {
$mail_body = qq{$mail_body}; ## $mail_body = text inhalt ohne html
$mail = $spamtest->parse($mail_body);
$status = $spamtest->check($mail);
if ( $status->is_spam() ) {
$new_status = 1;
print 'spam';
} else {
$new_status = 0;
print 'kein spam';
}
}
Die Ausgabe der $mailId klappt nur, wenn ich sämtliche SA-Methoden kommentiere.
Für einen Denkanstoß oder eine Idee bin ich in jedem Fall dankbar!