perl - 为什么 Template Toolkit 没有聚合我的计数器？

Question

我正在开发一个简单的 Dancer 应用程序来记录一个人读过的书，但是在我的模板中显示一个人读过多少本书，我遇到了一个错误。我正在尝试遍历阅读实例表中的每一行，如果读者与列出的人相同，则将 1 添加到计数器。

这是模板的代码：

<ul class="people">
<% IF people.size %>
  <% FOREACH id IN people.keys.nsort %>
    <li><h2 style="display: inline;"><% people.$id.name %></h2><br />
    Born <% people.$id.birthday %><br />
    <% FOREACH reader IN readings.keys.nsort %>
      <% count = 0 %>
      <% IF readings.$reader.person_id == people.$id.id %>
        <% count = count + 1 %>
      <% END %>
    <% END %>
    <% count %>
  <% END %>
<% ELSE %>
  <li><em>Unbelievable.  No people here so far</em>
<% END %>
</ul>

但是，当我显示它时，计数仅为 1。有人知道我做错了什么，还是需要更多代码？

谢谢。

Answer 1

看起来您需要将count初始化拉出FOREACH reader循环：

<% FOREACH id IN people.keys.nsort %>
  <li><h2 style="display: inline;"><% people.$id.name %></h2><br />
  Born <% people.$id.birthday %><br />
  <% count = 0 %>
  <% FOREACH reader IN readings.keys.nsort %>
    <% IF readings.$reader.person_id == people.$id.id %>
      <% count = count + 1 %>
    <% END %>
  <% END %>
  <% count %>
<% END %>