Mail::Milter::Wrapper::RejectMsgEditor.3pm

Langue: en

Autres versions - même langue

Version: 2004-02-26 (ubuntu - 07/07/09)

Section: 3 (Bibliothèques de fonctions)

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