Template Toolkit Variabeln aus foreach Loop definieren (gelöst) (Fragen zu Perl-Modulen)

[thread]19149[/thread]

Template Toolkit Variabeln aus foreach Loop definieren [gelöst]

Tags: perl5 template foreach toolkit Ähnliche Threads

Leser: 13

Articles: hide open all | hide show old branches

+11 replies
tino91DE

2014-06-14 14:24
User since
2014-06-08
8 Artikel
BenutzerIn
Hallo Community,

ich bastel gerade mit dem schönen Template Toolkit rum. Stoße gerade aber auf ein Problem.

Ich habe ein Element mit einer Sprache definiert:
Code (perl): (dl )

1 2

$lang{"de"}{"ok"} = "Okay" $lang{"en"}{"ok"} = "Ok"
Und ein String welcher durch das Template Toolkit direkt gesplittet wird.
Code (perl): (dl )

$string = "test,ok,me"
Im Template selbst wird jetzt der String zerlegt und mit einer Foreach Schleife ausgegeben:
Code: (dl )

1 2 3 4 5 6

[% FOREACH key IN string.split(',') %] <tr> <td>[% key %]</td> <td><input type="text" name="[% key %]" size="20" class="formulartext" value="" id="input"></td> </tr> [% END %]
Klappt auch so weit ganz gut. [% key %] liefert in dem Fall "test", "ok" und "me" zurück. Nun möchte ich das [% key %] mit dem Sprachen-Element verbindet. Also praktisch [% lang_key %], wobei dies dann zu "lang_test", "lang_ok" und "lang_me" wird.

Gibt es da eine Möglichkeit. In PHP würde mir auf anhieb eine Lösung als $lang[$key] einfallen.

Danke vorab.
- pq
  
  2014-06-14 14:31
  
  User since
  2003-08-04
  12208 Artikel
  Admin1
  
  Hat nichts mit CGI zu tun (auch wenn es in einem CGI-skript angewendet wid)
  Moved from Perl/CGI to Fragen zu Perl-Modulen
  Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
  lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
- +9 replies
- jan
  
  2014-06-14 14:50
  User since
  2003-08-04
  2536 Artikel
  ModeratorIn
  War das nicht so, dass man mit $var auf die Variable des Inhalts von var zugreifen konnte?
  also praktisch
  
  Code: (dl )
  
  1 2 3
  
  language = "de"; code = "ok"; lang.$language.$code
  
  oder so ähnlich?
  - +2 replies
  - tino91DE
    
    2014-06-14 15:17
    
    User since
    2014-06-08
    8 Artikel
    BenutzerIn
    
    Hallo,
    
    also weder [% $lang_$key %] noch [% lang_$key %] haben hier geklappt.
    
    Fehler: Template process failed: file error - parse error - /template.html line 79: unexpected token ($)
    
    Die statischen Sprach-Vars rufe ich so auf [% lang_ok %] würde bei eingestellter englischer Sprache "Ok" und bei deutscher Sprache "Okay" zurück liefern.
    - pq
      
      2014-06-14 15:46
      
      User since
      2003-08-04
      12208 Artikel
      Admin1
      
      2014-06-14T13:17:10 tino91DE
      also weder [% $lang_$key %] noch [% lang_$key %] haben hier geklappt.
      
      das ist auch nicht ganz das, was jan gezeigt hat.
      Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
      lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
  - +6 replies
  - pq
    
    2014-06-14 15:44
    User since
    2003-08-04
    12208 Artikel
    Admin1
    
    genau, nur mit tags drumherum:
    
    Code: (dl )
    
    1 2 3
    
    [% language = "de" %] [% code = "ok" %] [% lang.$language.$code %]
    
    funktioniert hier.
    Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
    lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
    - +5 replies
    - tino91DE
      
      2014-06-14 15:51
      
      User since
      2014-06-08
      8 Artikel
      BenutzerIn
      
      2014-06-14T13:44:28 pq
      genau, nur mit tags drumherum:
      
      Code: (dl )
      
      1 2 3
      
      [% language = "de" %] [% code = "ok" %] [% lang.$language.$code %]
      
      funktioniert hier.
      
      Leider ist die Sprache als "lang_X" verankert. Es werden also ganz viele Variablen im Template zur Verfügung gestellt, z.B. "lang_ok" oder "lang_cancel". Ein Aufruf von "lang.ok" funktioniert in diesem Fall nicht. Daher suche ich nach einer Kombination, wie ich "lang_KEY" zu "lang_ok" machen kann. KEY ist in diesem Fall "ok".
      
      Kniffelig und unmöglich?
      - +4 replies
      - pq
        
        2014-06-14 16:02
        
        User since
        2003-08-04
        12208 Artikel
        Admin1
        
        dann müsstest du wohl erst das "lang_" aus der variable entfernen. das wäre mir dann aber fast schon zuviel logik im template...
        
        Code: (dl )
        
        1 2
        
        [% mylang = language.substr(5) %] [% lang.$mylang.$code %]
        
        Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
        lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
        
        +3 replies
        
        tino91DE
        
        2014-06-14 16:09
        
        User since
        2014-06-08
        8 Artikel
        BenutzerIn
        
        Hmm, mag leider auch nicht funktionieren. Die bereits gepostete Lösung von jan funktioniert tatsächlich gut. Eventuell sollte ich überlegen das Lang-Element anders zur Verfügung zu stellen, dass wäre dann durch aus einfacher gelöst und mit weniger Aufwand im Template verbunden, wie pq schon gesagt hat.
        
        Danke für die super schnellen Antworten.
        
        +2 replies
        
        pq
        
        2014-06-14 18:22
        
        User since
        2003-08-04
        12208 Artikel
        Admin1
        
        also bei mir funktionierts:
        
        Code (perl): (dl )
        
        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
        
        use strict; use warnings; use Template; my $config = {}; my $tt = Template->new($config); my $input = "foo.tt"; my $vars = { lang => { de => { "ok" => "Okay", }, en => { "ok" => "Ok", }, }, language => "lang_de", }; $tt->process($input, $vars) or die $tt->error(); __END__ foo.tt: [% code = "ok" %] [% mylang = language.substr(5) %] [% lang.$mylang.$code %]
        
        Ausgabe: 'Okay'
        
        vielleicht magst du mal ein beispiel posten, mit dem es nicht funktioniert?
        Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
        lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
        
        tino91DE
        
        2014-06-14 19:19
        
        User since
        2014-06-08
        8 Artikel
        BenutzerIn
        
        Code (perl): (dl )
        
        1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21
        
        use CGI::Carp qw(fatalsToBrowser); use CGI ':standard'; use strict; my %lang; $lang{"ok"}{"de"} = "OK"; $lang{"saved"}{"de"} = "Speichern erfolgreich. "; $lang{"ok"}{"en"} = "OK"; $lang{"saved"}{"en"} = "Saved!"; # Ist sonst dynamisch $sesslang = "de"; # Sprache einbinden for (keys %lang) { #print "Add $_ with $lang{$_}{$sesslang} for Sessionlang $sesslang <br>"; $vars{"lang_$_"} = $lang{$_}->{$sesslang}; } $tt->process($Template, \%vars ) || die "Template process failed: ", $tt->error(), "\n";
        
        Ich binde die Sprache anders ein, als wie im Beispiel von pq .

View all threads created 2014-06-14 14:24.