for my $row (@request) {
printf '<li><table class="glyphs%s">', !$row->{cell} && ' charmap';
printf '<caption>%s</caption>', $row->{set};
for my $row (@request) {
printf '<li><table class="glyphs%s">', !$row->{cell} && ' charmap';
printf '<caption>%s</caption>', $row->{set};
for my $section (qw{thead}) {
print "<$section><tr><th>↱";
print '<th>', $_ for @nibble;
for my $section (qw{thead}) {
print "<$section><tr><th>↱";
print '<th>', $_ for @nibble;
my ($codepoint, $name, $prop, $script, $string) = @$info;
$glyph = quote($string || $glyph);
my ($codepoint, $name, $prop, $script, $string) = @$info;
$glyph = quote($string || $glyph);
- <a href="/" rel="home">sheet.shiar.nl</a>/charset
- <a href="git://git.shiar.nl/sheet" rel="vcs-git" title="Git repository"><:= $VERSION :></a>
+ <a href="/" rel="home">sheet.shiar.nl</a>/charset.<a href="/source/charset.plp" rel="code">plp</a>
+ <a href="http://git.shiar.nl/sheet.git" rel="vcs-git" title="Git repository"><:= $VERSION :></a>
created by <a href="http://shiar.nl/" rel="author">Shiar</a> •
<a title="Licensed under the GNU Affero General Public License, version 3" rel="copyright"
href="http://www.fsf.org/licensing/licenses/agpl-3.0.html">AGPLv3</a>
created by <a href="http://shiar.nl/" rel="author">Shiar</a> •
<a title="Licensed under the GNU Affero General Public License, version 3" rel="copyright"
href="http://www.fsf.org/licensing/licenses/agpl-3.0.html">AGPLv3</a>