Add a section with some very frequently used characters (quotes, simple maths,
common signs, largest european languages).
return sprintf "<table>\n%s</table>\n", join '', map {"<tr>$_\n"} @rows;
}
+print "<h2>Common</h2>\n\n";
+print table(@$_) for (
+ [ 3 => [qw{. « » . ‹ › . ‘ ’ . “ ” . „ ‚}]],
+ [ 3 => [qw{. † ‡ • . § ¶ # . © ® ™ . − × ÷ . ± ² √}]],
+ [ 3 => [qw{. å ä ö ü ß . Å æ ø ű ſ}]],
+ [ 3 => [qw{. ¿ ç ñ é ê è}]],
+);
+
print "<h2>Arrows</h2>\n\n";
print table(@$_) for (
[ 4 => [qw{. ↖ ↑ ↗ ↔ . ← - → ↕ . ↙ ↓ ↘ -}]],