The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Mail::Pyzor::Digest

SYNOPSIS

    my $digest = Mail::Pyzor::Digest::get( $mime_text );

DESCRIPTION

A reimplementation of https://github.com/SpamExperts/pyzor/blob/master/pyzor/digest.py.

FUNCTIONS

$hex = get( $MSG )

This takes an email message in raw MIME text format (i.e., as saved in the standard mbox format) and returns the message’s Pyzor digest in lower-case hexadecimal.

The output from this function should normally be identical to that of the pyzor script’s digest command. It is suitable for use in Mail::Pyzor::Client’s request methods.