1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
|
=encoding utf8
=head1 NAME
Log::Report::Translator::Gettext - the GNU gettext infrastructure
=head1 INHERITANCE
Log::Report::Translator::Gettext
is a Log::Report::Translator
=head1 SYNOPSIS
# normal use (end-users view)
textdomain 'my-domain',
translator => Log::Report::Translator::Gettext->new;
print __"Hello World\n"; # language determined by environment
# internal use
my $msg = Log::Report::Message->new(
_msgid => "Hello World\n",
_textdomain => 'my-domain',
);
print Log::Report::Translator::Gettext->new
->translate($msg, 'nl-BE');
=head1 DESCRIPTION
UNTESTED!!! PLEASE CONTRIBUTE!!!
Translate a message using the GNU gettext infrastructure.
Guido Flohr reports:
be aware that Locale::gettext is only a binding for the C library
libintl and depends on its features. That means that your module will
effectively only run on GNU systems and maybe on Solaris (depending
on the exact version), because only these systems provide the plural
handling functions ngettext(), dngettext() and dcngettext(). Sooner or
later you will probably also need bind_textdomain_codeset() which is
also only available on certain systems.
=head1 METHODS
=head2 Translating
=over 4
=item $obj-E<gt>B<translate>($msg, $lang, $ctxt)
Z<>
=back
=head1 SEE ALSO
This module is part of Log-Report-Lexicon version 1.14,
built on September 08, 2025. Website: F<http://perl.overmeer.net/CPAN/>
=head1 LICENSE
For contributors see file ChangeLog.
This software is copyright (c) 2007-2025 by Mark Overmeer.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
|
