NAME

       Mail::Milter::Wrapper::RejectMsgEditor - milter wrapper to edit rejection messages

SYNOPSIS

           use Mail::Milter::Wrapper::RejectMsgEditor;

           my $milter = ...;
           my $wrapper = new Mail::Milter::Wrapper::RejectMsgEditor($milter, \&sub);

           my $wrapper2 = &RejectMsgEditor($milter, \&sub); # convenience

DESCRIPTION

       Mail::Milter::Wrapper::RejectMsgEditor is a convenience milter wrapper which allows editing of the
       messages returned for all SMFIS_REJECT rejections.  The subroutine provided should edit $_ and need not
       return any value.

       If the contained milter did not call "$ctx-"setreply()> before returning a rejection code, then a default
       message will be used.

       For example:

           my $wrapped_milter = &RejectMsgEditor($milter, sub {
               s,$, - Please e-mail postmaster\@foo.com for assistance.,
           });

AUTHOR

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

SEE ALSO

       Mail::Milter::Wrapper

perl v5.36.0                                       2023-01-22             Mail::Milter::W...RejectMsgEditor(3pm)