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

NAME

Haineko::SMTPD::Relay::Discard - Discard mailer class

DESCRIPTION

Discard any message

SYNOPSIS

    use Haineko::SMTPD::Relay::Discard;
    my $e = Haineko::SMTPD::Relay::Discard->new;
    my $s = $e->sendmail;

    print $s;                   # always return 1
    print $e->response->error;  # always return 0
    print $e->response->dsn;    # always return undef

    warn Data::Dumper::Dumper $e->response;
    $VAR1 = bless( {
             'dsn' => undef
             'error' => 0,
             'code' => '200',
             'message' => [ 'Discard' ],
             'command' => 'DATA'
            }, 'Haineko::SMTPD::Response' );

CLASS METHODS

new( %arguments )

new() is a constructor of Haineko::SMTPD::Relay::Discard

    my $e = Haineko::SMTPD::Relay::Discard->new;

INSTANCE METHODS

sendmail

sendmail() will discard any message

    my $e = Haineko::SMTPD::Relay::Discard->new;
    print $e->sendmail;         # 1, message discarded
    print Dumper $e->response;  # Dumps Haineko::SMTPD::Response object

REPOSITORY

https://github.com/azumakuniyuki/Haineko

AUTHOR

azumakuniyuki <perl.org [at] azumakuniyuki.org>

LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.