NAME

Log::Report::Translator::POT - translation based on POT files

INHERITANCE

Log::Report::Translator::POT
  is a Log::Report::Translator

SYNOPSIS

  # internal use
  my $msg = Log::Report::Message->new(
	_msgid  => "Hello World\n",
    _domain => 'my-domain',
  );

  print Log::Report::Translator::POT
     ->new(lexicons => $dir)
     ->translate($msg, 'nl-BE');

  # normal use (end-users view in the program's ::main)
  textdomain 'my-domain',
    translator =>  Log::Report::Translator::POT->new(lexicon => $dir);
  print __"Hello World\n";

DESCRIPTION

Translate a message by directly accessing POT files. The files will load lazily (unless forced). This module accesses the PO's in a compact way, using Log::Report::Lexicon::POTcompact, which is much more efficient than Log::Report::Lexicon::PO.

METHODS

Constructors

$class->new(%options)

-Option  --Default
 charset   <C<undef>>
 lexicons  <see text>

charset => STRING

Enforce character set for files. We default to reading the character-set as defined in the header of each PO file.

lexicons => DIRECTORY

The DIRECTORY where the translations can be found. See Log::Report::Lexicon::Index for the expected structure of such DIRECTORY.

The default is based on the location of the module which instantiates this translator. The filename of the module is stripped from its .pm extension, and used as directory name. Within that directory, there must be a directory named messages, which will be the root directory of a Log::Report::Lexicon::Index.

example: default lexicon directory

# file xxx/perl5.8.8/My/Module.pm
use Log::Report 'my-domain',
  translator => Log::Report::Translator::POT->new;

# lexicon now in xxx/perl5.8.8/My/Module/messages/

Accessors

$obj->charset()

Returns the default charset, which can be overrule by the locale.

$obj->lexicons()

Returns a list of Log::Report::Lexicon::Index objects, where the translation files may be located.

Translating

$obj->translate($msg, $lang, $context)

DIAGNOSTICS

Error: You have to upgrade Log::Report::Lexicon to at least 1.00

Cast by new()

Info: read table $filename as $class for $dname in $locale

Cast by translate()

Error: unknown translation table extension '$ext' in $filename

Cast by translate()

SEE ALSO

This module is part of Log-Report-Lexicon version 1.14, built on September 08, 2025. Website: http://perl.overmeer.net/CPAN/

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.