perl - 如何将参数传递给模板工具包函数中的子例程

Question

我的文件 foo.tt 我想写这样的东西:

[% INCLUDE header('str', 1, 2, 3, 5, 10) %]

我的目标是对 str 进行一些字符串操作，然后使用 foreach/for 迭代所有数字。

不幸的是，我无法在模板工具包中找到这种类型的语法。

将参数传递给子例程的模板工具包方式是什么？

有什么想法吗？

Answer 1

你可以传递参数，但你需要给它们命名。示例:

outer.tt2:

[% INCLUDE header.tt2 header_string="str", items=[ 1, 2, 3, 5, 10 ] -%]

header.tt2:

String: [% header_string %]
[% FOREACH item IN items -%]
Item: [% item %]
[% END -%]

输出:

String: str
Item: 1
Item: 2
Item: 3
Item: 5
Item: 10