我试图通过一个“泥瓦匠”'变量到在HTML之前运行的Perl自动处理程序脚本。 这可能。
<!--- MASON -->
<html>
<body>
<%init>
my $sub_headline = 'this is text';
</%init>
###HEADER###
</body>
</html>
<!--- AUTOHANDLER --->
my $m_header = '<div class="m-portlet__head">
<div class="m-portlet__head-caption">
<div class="m-portlet__head-title">
<h3 class="m-portlet__head-text">###TITLE###</h3>
</div>
<p>$sub_headline</p>
</div><!-- /.caption -->
</div><!-- /.head -->';
$html =~ s/###HEADER###/${m_header}/i;
答案 0 :(得分:0)
结束为标题创建组件并为传入的arg添加条件。然后pirnt正确的HTML。