perl - 如何使 perl 正确识别 <% 标记

Question

我必须在 perl 中继续一个现有的项目，但我是一个新手，我遇到了一个我无法解决的问题。代码充满了这种语法

if ( $Session->{CurrentUserEntityId} )
{
  %>

  <%=&get_leftnav_html('index')%>

  <div class="mainContent">

    <!-- 
    The following tile colors are accepted:
    #A200FF, #FF0097, #00ABA9, #8CBF26, #A05000, #E671B8, #F09609, #1BA1E2, #E51400, #339933
    -->

    <div class="tile_container">
        <div class="tile">
            (...)
        </div>

依此类推...在服务器上一切正常，但我可以在本地主机上运行代码，因为我在 apache 错误日志中收到此错误：

[错误] /var/www/piqresearch/piqresearch/marketData/htdocs/index.pl 第 1 行的未终止 <> 运算符。\n

如果我将 open <% 和 %> 写入同一行，那么 perl 会接受它，但它会在下一次出现时死掉，并且项目包含数百个文件，可能还有数千个这个标记。我在网上、文章、教程和 Stack Overflow 上搜索了解决方案，但一无所获。我认为这只是某种配置错误，但我找不到该怎么办。谢谢您的帮助。

Answer 1

那不是 Perl。这是一个梅森模板。您需要使用 Mason 来处理您的模板，而不是 Perl。