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

NAME

Log::Dispatch::Email::EmailSender - Subclass of Log::Dispatch::Email that uses Email::Sender

VERSION

version 0.150390

SYNOPSIS

    use Log::Dispatch;

    my $log = Log::Dispatch->new(
        outputs => [
            [
                'Email::EmailSender'
            ,   min_level => 'emerg'
            ,   to        => [qw( foo@example.com bar@example.org )]
            ,   subject   => 'Big error!'
            ]
        ]
    );

    $log->emerg("Something bad is happening");

or you can specify a transport:

    use Log::Dispatch;

    my $log = Log::Dispatch->new(
        outputs => [
            [
                'Email::EmailSender'
            ,   min_level => 'emerg'
            ,   smtp      => 'smtp.foo.com'
            ,   port      => 9856
            ,   to        => [qw( foo@example.com bar@example.org )]
            ,   subject   => 'Big error!'
            ]
        ]
    );

    $log->emerg("Something bad is happening");

DESCRIPTION

This is a subclass of Log::Dispatch::Email that implements the send_email method using the Email::Sender module.

METHODS

new

The constructor can take the following optional parameters in addition to the standard parameters documented in Log::Dispatch::Email:

  • smtp ($)

    SMTP server.

  • port ($)

    Unusual SMTP server port. Default to 25.

send_email

The Log::Dispatch::Email subclassed method.

SEE ALSO

Log::Dispatch::Email::MIMELite

Log::Dispatch::Email::MailSend

Log::Dispatch::Email::EmailSend

Log::Dispatch::Email::MailSender

Log::Dispatch::Email::MailSendmail

AUTHOR

losyme <losyme@gmail.com>

COPYRIGHT AND LICENSE

This software is copyright (c) 2013 by losyme.

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