DOKK / manpages / debian 12 / liblog-handler-perl / Log::Handler::Output::Forward.3pm.en
Log::Handler::Output::Forward(3pm) User Contributed Perl Documentation Log::Handler::Output::Forward(3pm)

Log::Handler::Output::Forward - Forward messages to routines.

    use Log::Handler::Output::Forward;
    my $forwarder = Log::Handler::Output::Forward->new(
        forward_to => sub { },
        arguments  => [ "foo" ],
    );
    $forwarder->log(message => $message);

This output module makes it possible to forward messages to sub routines.

new()

Call "new()" to create a new Log::Handler::Output::Forward object.

The following options are possible:

This option excepts a code reference.

Please note that the message is forwarded as a hash reference. If you change it then this would have an effect to all outputs.

With this option you can define arguments that will be passed to the sub routine.

In the following example the arguments would be passed as a array to "Class::method()".

    my $forwarder = Log::Handler::Output::Forward->new(
        forward_to => \&Class::method,
        arguments  => [ $self, "foo" ],
    );
    

This would call intern:

    Class::method(@arguments, $message);
    

If this option is not set then the message will be passed as first argument.

log()

Call "log()" if you want to forward messages to the subroutines.

Example:

    $forwarder->log("this message will be forwarded to all sub routines");

validate()

Validate a configuration.

reload()

Reload with a new configuration.

errstr()

This function returns the last error message.

Note that the message will be forwarded as a hash reference.

If you make changes to the reference it affects all other outputs.

The hash key "message" contains the message.

    Carp
    Params::Validate

No exports.

Please report all bugs to <jschulz.cpan(at)bloonix.de>.

If you send me a mail then add Log::Handler into the subject.

Jonny Schulz <jschulz.cpan(at)bloonix.de>.

Copyright (C) 2007-2009 by Jonny Schulz. All rights reserved.

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

2022-08-28 perl v5.34.0