man Mail::Milter::Module::HeaderRegex () - milter to accept/reject messages with certain headers

NAME

Mail::Milter::Module::HeaderRegex - milter to accept/reject messages with certain headers

    use Mail::Milter::Module::HeaderRegex;

    my $milter = new Mail::Milter::Module::HeaderRegex('^Foo: ');

    my $milter2 = &HeaderRegex('^Foo: Bar'); # convenience

This milter module rejects messages at DATA phase if one of the message's headers matches user-supplied regular expressions.

new(REGEX[, ...]): Accepts one or more regular expressions, as strings or qr// precompiled regexes. They are tested in sequence, and the first match terminates checking.
set_message(MESSAGE): Sets the message used when rejecting messages. This string may contain the substring CW%H, which will be replaced by the matching header name. This method returns a reference to the object itself, allowing this method call to be chained.

Todd Vierling, <tv@duh.org> <tv@pobox.com>