Locale-TextDomain-OO - Was hat sich getan?‎

Ursprünglich als Erweiterung

• Locale::TextDomain in bestehendes Projekt einbinden
• Lexikon war in Datenbank
• Am Ende ist nichts daraus geworden.

Probleme

• UTF-8: alles Bytes
• Abhängigkeiten: $ENV{...}

Pause

• aufgegeben in 2010
• neuer Versuch ab 2013

Ziele zum Teil übernommen

• keine Abhängigkeiten Betriebssystem-Einstellungen
• Gettext mit benannten Platzhaltern
• Maketext möglich
• beliebige Lexikon-Quelle
‎‎

Neuheiten

• Moo
• keine Abhängigkeit zu Locale::TextDomain
• Lexikon zur Compiletime befüllen
• Lexikon Manipulation mit copy/delete/move
• Maketext möglich

Neuheiten

• Manipulation der Platzhalter: Gettext modifier_code (attribute :num :numf... :html)
• Nachbearbeitung: Gettext und Maketext formatter_code
• JavaScript Bibliothek
‎‎
• keine Abhängigkeiten Browser-Einstellungen
‎‎

Architektur

https://metacpan.org/pod/Locale::TextDomain::OO#Overview

Architektur Lexikon

• eine Singleton für alle Projekte
• ... in JavaScript aufgeteilt in verschiedene JSON Files
• Regionen als Differenz (de-ch = de + de-ch)
• Maketext: Gettext-Format %1 konvertiert zu Maketext-Format [_1]

Architektur Translator

• Plugins sind Rollen
• ... einmal wählen oder immer gleich angeben
• verschiedene Objekte oder ein Singleton
• am Ende arbeiten wir mit einem Singleton
• ... die Frage ist nur, wer es erstellt
• ... so überall verfügbar, kein durchschleifen
• Platzhalter über Attribute manipulieren (:num... :html)
• nach der Übersetzung nachbearbeiten
• Sprache auswählen - keine Magie

empfohlenes Plugin

• Expand::Gettext::Loc
• Expand::Maketext::Loc (wenn nötig)

Getext

    ...->loc_('This is a text.');

Gettext mit Plural, Kontext und Platzhalter

    ...->loc_npx(
        'appointment',
        'This is {dates :num} date.',
        'This are {dates :num} dates.',
        1,
        dates => 1,
    );

Maketext

    ...->loc_m(
        'Send email to <strong>[_1]</strong>.',
        #                      ^^^^
        'Max Mustermann <mustermann@example.com>',
    );

Bei Maketext kann man dem Platzhalter das Attribut :html nicht geben.

Maketext mit Kontext

    ...->loc_mp(
        'appointment',
        'This are [*,_1,date,dates].',
        #     ^^^
        1,
    );

Bei Maketext ist man mit dem Plural etwas eingeschränkt.

HTML und JavaScript

Prinzipiell kann man HTML auch mit übersetzen, jedoch ist es 2. Wahl nach plain Text.

JavaScript wird auch mit übersetzt.

    ...->loc_('... <a href="foo.de" on...="...">...</a> ...');

Man läuft Gefahr HTML und JavaScript mit der Übersetzung zu zerstören.

nicht vorhanden - nicht kaputt

HTML geht unwahrscheinlicher kaputt, weil primitiv. JavaScript geht nicht kaputt.

Die Lösung ist hier HTML::Zoom und leeres a-Tag, weil es erst während dem Rendern konfiguriert wird. (Patrick Grämer)

    <span class="...">... <a>...</a> ...</span>

... und fertigen Link einsetzen

    ->replace_content( \$ctx->loc_('<a>...</a>') )
    ->then
    ->collect({
        filter => sub {
            $_
                ->select('a')
                ->set_attribute('href' => 'foo.de');
        },
        passthrough => 1,
    })

JavaScript Initialisierung

<script type="text/javascript">
    var language_locales = {
        "LC_NUMERIC":{
            "decimal_point":".", "thousands_sep":",", "grouping":["3","3"]
        },
        "LC_MONETARY":{
            "n_sep_by_space":"0", "currency_symbol":"£", "p_sign_posn":"1", "negative_sign":"-", "int_curr_symbol":"GBP ", "frac_digits":"2", "p_sep_by_space":"0", "positive_sign":"", "n_cs_precedes":"1", "p_cs_precedes":"1", "int_frac_digits":"2", "mon_grouping":["3","3"], "n_sign_posn":"1", "mon_thousands_sep":",", "mon_decimal_point":"."}
        };
    var language_tag = "i-default";
    $(function() {
        $.datepicker.setDefaults($.datepicker.regional['en-GB']);

Extract

Locale::TextDomain::OO::Extract

• Die Files lesen: HTML, JavaScript, Perl, ..., YAML
• JavaScript in HTML wird ignoriert.

Process

Locale::TextDomain::OO::Process

https://metacpan.org/.../example/21_process_utf-8.pl

Das Beispiel sagt schon alles, wie der Ablauf ist. Wenn man mit mo-Files arbeitet, muss man am Ende noch ausführen:

    $process->spew(mo => "../2nd_${language}_${domain}_clean.mo");

Autotranslator 1/2

Locale::Utils::Autotranslator

• PO File lesen
• Unübersetztes suchen
• Platzhalter ersetzen (Numeric + Plural | String)
• Platzhalter zwischenspeichern
• API aufrufen (Limits)
• Platzhalter wieder einsetzen
• PO File speichern

Autotranslator 2/2

Locale::Utils::Autotranslator

https://metacpan.org/.../example/01_my_translator_utf-8.pl

Das Beispiel zeigt auch, wie die Platzhalter beim Übersetzungstool ankommen.

Ende