+ say "<caption>$_</caption>" for join(' ', grep {$_}
+ $offset > $size && sprintf('<a rel="start" href="?q=%d">◄</a>', 0),
+ $offset > 0 && sprintf(
+ '<a rel="prev" href="?q=%d" title="U+%1$04X">◅</a>',
+ $offset - $size,
+ ),
+ sprintf('U+%04X', $offset), #TODO: block name
+ $offset + $size < 0x11_0000 && sprintf(
+ '<a rel="next" href="?q=%d" title="U+%1$04X">▻</a>',
+ $offset + $size,
+ ),
+ );
+ for my $cp ($offset .. $offset+$size-1) {