/ 
Locale-TextDomain-OO-1.031
River stage one • 2 direct dependents • 2 total dependents
/ Locale::TextDomain::OO::Role::Logger

NAME

Locale::TextDomain::OO::Role::Logger - Provides a logger method

$Id: Logger.pm 651 2017-05-31 18:10:43Z steffenw $

$HeadURL: svn+ssh://steffenw@svn.code.sf.net/p/perl-gettext-oo/code/module/trunk/lib/Locale/TextDomain/OO/Role/Logger.pm $

VERSION

1.027

DESCRIPTION

This module provides a logger method for for Locale::TextDomain:OO.

SYNOPSIS

use Log::Any qw($log);

with qw(
    Locale::TextDomain::OO::Role::Logger
);

SUBROUTINES/METHODS

method logger

Store logger code to get some information what lexicon is used or why the translation process is using a fallback.

$lexicon_hash->logger(
    sub {
        my ($message, $arg_ref) = @_;
        my $type = $arg_ref->{type};
        $log->$type($message);
        return;
    },
);

$arg_ref contains

object => $self, # the object itself
type   => 'debug', # the log category
event  => 'lexicon,load', # event category

Get back

$code_ref_or_undef = $self->logger;

EXAMPLE

Inside of this distribution is a directory named example. Run this *.pl files.

DIAGNOSTICS

nothing

CONFIGURATION AND ENVIRONMENT

none

DEPENDENCIES

Moo::Role

MooX::Types::MooseLike::Base

INCOMPATIBILITIES

not known

BUGS AND LIMITATIONS

none

SEE ALSO

Locale::TextDoamin::OO

AUTHOR

Steffen Winkler

LICENSE AND COPYRIGHT

Copyright (c) 2013 - 2017, Steffen Winkler <steffenw at cpan.org>. All rights reserved.

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