for my $row (@request) {
printf '<li><table class="glyphs%s">', !$row->{cell} && ' charmap';
printf '<caption>%s</caption>', $row->{set};
- print '<col>';
+ print '<col>' x 17;
for my $section (qw{thead}) {
print "<$section><tr><th>↱";
print '<th>', $_ for @nibble;