print '<tr>';
print '<td colspan=2>unicode';
print '<td>name';
-print '<td>di<td>html';
+print '<td><a href="/digraphs" title="digraph">di</a><td>html';
printf '<td title="%s">%s', $font{$_}->{-name}, $font{$_}->{-id} // $_
for @fontlist;
say '</thead>';