1Locale::TextDomain::OO:U:sReorleC:o:nLtorgigbeurt(e3d)PLeorclalDeo:c:uTmeexnttDaotmiaoinn::OO::Role::Logger(3)
2
3
4
6 Locale::TextDomain::OO::Role::Logger - Provides a logger method
7
8 $Id: Logger.pm 651 2017-05-31 18:10:43Z steffenw $
9
10 $HeadURL:
11 svn+ssh://steffenw@svn.code.sf.net/p/perl-gettext-oo/code/module/trunk/lib/Locale/TextDomain/OO/Role/Logger.pm
12 $
13
15 1.027
16
18 This module provides a logger method for for Locale::TextDomain:OO.
19
21 use Log::Any qw($log);
22
23 with qw(
24 Locale::TextDomain::OO::Role::Logger
25 );
26
28 method logger
29 Store logger code to get some information what lexicon is used or why
30 the translation process is using a fallback.
31
32 $lexicon_hash->logger(
33 sub {
34 my ($message, $arg_ref) = @_;
35 my $type = $arg_ref->{type};
36 $log->$type($message);
37 return;
38 },
39 );
40
41 $arg_ref contains
42
43 object => $self, # the object itself
44 type => 'debug', # the log category
45 event => 'lexicon,load', # event category
46
47 Get back
48
49 $code_ref_or_undef = $self->logger;
50
52 Inside of this distribution is a directory named example. Run this
53 *.pl files.
54
56 nothing
57
59 none
60
62 Moo::Role
63
64 MooX::Types::MooseLike::Base
65
67 not known
68
70 none
71
73 Locale::TextDoamin::OO
74
76 Steffen Winkler
77
79 Copyright (c) 2013 - 2017, Steffen Winkler "<steffenw at cpan.org>".
80 All rights reserved.
81
82 This module is free software; you can redistribute it and/or modify it
83 under the same terms as Perl itself.
84
85
86
87perl v5.32.1 2021-0L1o-c2a7le::TextDomain::OO::Role::Logger(3)