The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Log::Report::Lexicon::POTcompact - use translations from a POT file

INHERITANCE

 Log::Report::Lexicon::POTcompact
   is a Log::Report::Lexicon::Table

SYNOPSIS

 # using a PO table efficiently
 my $pot = Log::Report::Lexicon::POTcompact
             ->read('po/nl.po', charset => 'utf-8')
    or die;

 my $header = $pot->msgid('');
 print $pot->msgstr('msgid', 3);

DESCRIPTION

This module is translating, based on PO files. PO files are used to store translations in humanly readable format for most of existing translation frameworks, like GNU gettext and Perl's Maketext.

Internally, this module tries to be as efficient as possible: high speed and low memory foot-print. You will not be able to sub-class this class cleanly.

If you like to change the content of PO files, then use Log::Report::Lexicon::POT.

METHODS

Constructors

Log::Report::Lexicon::POTcompact->new(OPTIONS)

See "Constructors" in Log::Report::Lexicon::Table

Log::Report::Lexicon::POTcompact->read(FILENAME, OPTIONS)

Read the POT table information from FILENAME, as compact as possible. Comments, plural-form, and such are lost on purpose: they are not needed for translations.

 -Option --Default
  charset  <required>
charset => STRING

The character-set which is used for the file. You must specify this explicitly, while it cannot be trustfully detected automatically.

Attributes

$obj->filename()

Returns the name of the source file for this data.

$obj->index()

Returns a HASH of all defined PO objects, organized by msgid. Please try to avoid using this: use msgid() for lookup.

Managing PO's

Translation

$obj->msgid(STRING)

Lookup the translations with the STRING. Returns a SCALAR, when only one translation is known, and an ARRAY wherein there are multiple. Returns undef when the translation is not defined.

$obj->msgstr(MSGID, [COUNT])

Returns the translated string for MSGID. When not specified, COUNT is 1 (the single form).

Administration

$obj->add(PO)

See "Administration" in Log::Report::Lexicon::Table

$obj->header(FIELD)

See "Administration" in Log::Report::Lexicon::Table

$obj->nrPlurals()

See "Administration" in Log::Report::Lexicon::Table

$obj->pluralIndex(COUNT)

See "Administration" in Log::Report::Lexicon::Table

$obj->setupPluralAlgorithm()

See "Administration" in Log::Report::Lexicon::Table

$obj->translations([ACTIVE])

See "Administration" in Log::Report::Lexicon::Table

DIAGNOSTICS

Error: only acceptable parameter is 'ACTIVE'

SEE ALSO

This module is part of Log-Report distribution version 0.993, built on March 28, 2013. Website: http://perl.overmeer.net/log-report/

LICENSE

Copyrights 2007-2013 by [Mark Overmeer]. For other contributors see ChangeLog.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See http://www.perl.com/perl/misc/Artistic.html