perl - 如何在 Template ToolKit 中输出 perl Template Toolkit 示例

Question

我正在通过 Template Toolkit 文件为 Template Toolkit 制作一些文档。目标是显示我正在使用的代码以及代码的输出。现在，我正在复制代码并将所有“%”字符替换为“%”字符串。

所以，我会有这样的东西:

The Template Toolkit code:

    [% FOREACH name IN nameArray %][% name %][% IF !loop.last %], [% END %][% END %]

Produces the output:

    [% FOREACH name IN nameArray %][% name %][% IF !loop.last %], [% END %][% EN D%]

这将输出如下内容:

The Template Toolkit code:

    [% FOREACH name IN nameArray %][% name %][% IF !loop.last %], [% END %][% END %]

Produces the output:

    George, Jane, Judy, Elroy

我的问题是是否有替代/更好的方法来做到这一点？理想情况下，我不必每次都有效地复制代码。

Answer 1

您可以将您的代码分配给一个变量，然后通过 eval filter 将其通过管道传递.要防止 [% 和 %] 标签在您的模板中被解释，请使用 TAGS directive将开始/结束标签设置为其他内容。示例:

[% TAGS [- -] %]

The Template Toolkit code:
    [- code = '[% FOREACH name IN nameArray %][% name %][% IF !loop.last %], [% END %][% END %]' -]
    [- code -]

Produces the output:
    [- code | eval -]