Perl 我可以在模板内设置模板继承吗?(模板工具包)

Perl 我可以在模板内设置模板继承吗?(模板工具包),perl,template-toolkit,Perl,Template Toolkit,我必须根据用户所处的状态显示不同的医疗表单。还有一种默认形式,许多州都有。这些医疗表单都是在模板工具包中编写的,它们包含在更大的模板中。状态以规范化形式作为变量提供 我需要选择特定于州的模板(如果存在),否则返回默认值。我最好怎么做呢 INCLUDE\u PATH已被用于控制站点样式之间的切换。类似的操作应该可以完成这项工作: main.tt: This is a main template [% GET state %] [% SET iname = state _ ".tt" %] [% T

我必须根据用户所处的状态显示不同的医疗表单。还有一种默认形式,许多州都有。这些医疗表单都是在模板工具包中编写的,它们包含在更大的模板中。状态以规范化形式作为变量提供

我需要选择特定于州的模板(如果存在),否则返回默认值。我最好怎么做呢


INCLUDE\u PATH
已被用于控制站点样式之间的切换。

类似的操作应该可以完成这项工作:

main.tt:

This is a main template [% GET state %]
[% SET iname = state _ ".tt" %]
[% TRY %]
[% INCLUDE "$iname" %]
[% CATCH %]
[% INCLUDE default.tt %]
[% END %]
End of main template
default.tt:

This is default template
s1.tt:

This is template for state s1.
t、 pl:

运行
t.pl
时:

This is a main template s1
This is template for state s1.
End of main template
---------
This is a main template unknown
This is default template
End of main template

看起来会有用的,谢谢!我可以把它抽象成一个实用程序模板,这样我就可以像
[%INCLUDE“util/bystate”template=“some_form.tt2”]
This is a main template s1
This is template for state s1.
End of main template
---------
This is a main template unknown
This is default template
End of main template