---
name: "Mail::Milter::Wrapper::RejectMsgEditor"
section: "3pm"
platform: "linux"
package: "libmail-milter-perl"
version: "0.07-2"
release: "Debian 12 (Bookworm)"
platforms: ["linux"]
url: "https://new.carta.tech/Mail::Milter::Wrapper::RejectMsgEditor"
---

# Mail::Milter::Wrapper::RejectMsgEditor(3pm)

milter wrapper to edit rejection messages

## 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