NAME Log::Any::Adapter::Coderef - arbitrary code handlers for Log::Any messages SYNOPSIS use JSON::MaybeUTF8 qw(:v1); use Log::Any::Adapter qw(Coderef) => sub { my ($data) = @_; STDERR->print(encode_json_utf8($data) . "\n"); }; DESCRIPTION Provides support for sending log messages through a custom sub, for cases when you want to do something that isn't provided by existing adapters. Currently takes a single $code parameter as a callback. This will be called for every log message, passing a hashref which has the following keys: * epoch - current time, as a floating-point epoch value * severity - log level, e.g. info or debug * message - the formatted log message * host - current hostname * pid - current process ID ("$$" in perlvar) * stack - arrayref of stacktrace entries, see caller Additional keys may be added in future, for example structured data. AUTHOR Tom Molesworth <TEAM@cpan.org>. LICENSE Copyright Tom Molesworth 2020-2021. Licensed under the same terms as Perl itself.