The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
<table class="table table-bordered table-condensed table-striped nd_floatinghead">
  <thead>
    <tr>
      <th class="nd_center-cell">Left Device</th>
      <th class="nd_center-cell">Port</th>
      <th class="nd_center-cell">Duplex</th>
      <th class="nd_center-cell">Right Device</th>
      <th class="nd_center-cell">Port</th>
      <th class="nd_center-cell">Duplex</th>
    </tr>
  </thead>
  </tbody>
    [% WHILE (row = results.next) %]
    <tr>
      <td class="nd_center-cell">[% row.left_dns || row.left_ip | html_entity %]</td>
      <td class="nd_center-cell"><a class="nd_linkcell"
        href="[% device_ports %]&q=[% row.left_dns || row.left_ip | uri %]&f=[% row.left_port | uri %]&c_duplex=on">
          [% row.left_port | html_entity %]</a></td>
      <td class="nd_center-cell">[% row.left_duplex.ucfirst | html_entity %]</td>

      <td class="nd_center-cell">[% row.right_dns || row.right_ip | html_entity %]</a>
      <td class="nd_center-cell"><a class="nd_linkcell"
        href="[% device_ports %]&q=[% row.right_dns || row.right_ip | uri %]&f=[% row.right_port | uri %]&c_duplex=on">
          [% row.right_port | html_entity %]</a></td>
      <td class="nd_center-cell">[% row.right_duplex.ucfirst | html_entity %]</td>
    </tr>
    [% END %]
  </tbody>
</table>