[- $r = shift -]
[-
$r -> {language_set} = [{id => 'de', 'name' => 'Deutsch'}, {id => 'en', 'name' => 'English'}, ] ;
$escmode = 3 ;
-]
[$ foreach $i (1..4) $]
addsel[+$i +] = [+ $r -> gettext ("addsel$i") +]
[= next =]
addsel[+$i +] (2) = [+ $r -> gettext ("addsel$i") +]
[$endforeach$]
[$ foreach $i (1..4) $]
addsel[+$i +] = [+ $r -> gettext ("addsel$i") +]
last: [= last =]
[$endforeach$]
[$ foreach $i (1..4) $]
addsel[+$i +] = [+ $r -> gettext ("addsel$i") +]
[= last =]
[$endforeach$]
[= this is text with spaces =]
[+ $r -> gettext('ΔάΦ') +]
[= test undef =]