git.shiar.nl
/
sheet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
digraphs: unicode 5.0 character details
[sheet.git]
/
unicode.plp
diff --git
a/unicode.plp
b/unicode.plp
index 7c05183a474f58442e60cab54100955e1984175f..1aadd030a23049454ad63d3ca7d1b8dbcbef0740 100644
(file)
--- a/
unicode.plp
+++ b/
unicode.plp
@@
-142,6
+142,14
@@
sub table {
return sprintf "<table>\n%s</table>\n", join '', map {"<tr>$_\n"} @rows;
}
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{. ↖ ↑ ↗ ↔ . ← - → ↕ . ↙ ↓ ↘ -}]],
print "<h2>Arrows</h2>\n\n";
print table(@$_) for (
[ 4 => [qw{. ↖ ↑ ↗ ↔ . ← - → ↕ . ↙ ↓ ↘ -}]],
@@
-152,13
+160,20
@@
print table(@$_) for (
print "<h2>Line drawing</h2>\n\n";
print table(@$_) for (
print "<h2>Line drawing</h2>\n\n";
print table(@$_) for (
- [ 4 => [qw{. ┌ ┬ ┐
─ . ├ ┼ ┤ │ . └ ┴ ┘ -
}]],
- [ 4 => [qw{. ┏ ┳ ┓
━ . ┣ ╋ ┫ ┃ . ┗ ┻ ┛ -
}]],
+ [ 4 => [qw{. ┌ ┬ ┐
. ├ ┼ ┤ . └ ┴ ┘
}]],
+ [ 4 => [qw{. ┏ ┳ ┓
. ┣ ╋ ┫ . ┗ ┻ ┛
}]],
[ 3 => [qw{. ┍ ┯ ┑ . ┝ ┿ ┥ . ┕ ┷ ┙}]],
[ 3 => [qw{. ┎ ┰ ┒ . ┠ ╂ ┨ . ┖ ┸ ┚}]],
[ 3 => [qw{. ┍ ┯ ┑ . ┝ ┿ ┥ . ┕ ┷ ┙}]],
[ 3 => [qw{. ┎ ┰ ┒ . ┠ ╂ ┨ . ┖ ┸ ┚}]],
-# [ 4 => [qw{. ╔ ╦ ╗ ═ . ╠ ╬ ╣ ║ . ╚ ╩ ╝ -}]],
-# [ 3 => [qw{. ╒ ╤ ╕ . ╞ ╪ ╡ . ╘ ╧ ╛}]],
-# [ 3 => [qw{. ╓ ╥ ╖ . ╟ ╫ ╢ . ╙ ╨ ╜}]],
+ [ 4 => [qw{
+ . ╴ ─ ╌ ┄ ┈ ╶ ╾
+ . ╸ ━ ╍ ┅ ┉ ╺ ╼
+ . ╵ │ ╎ ┆ ┊ ╷ ╿
+ . ╹ ┃ ╏ ┇ ┋ ╻ ╽
+ }]],
+ [ 1 => [qw{. ╱ ╳ ╲ }]],
+ [ 4 => [qw{. ╔ ╦ ╗ ═ . ╠ ╬ ╣ ║ . ╚ ╩ ╝ - }]],
+ [ 3 => [qw{. ╒ ╤ ╕ . ╞ ╪ ╡ . ╘ ╧ ╛ }]],
+ [ 3 => [qw{. ╓ ╥ ╖ . ╟ ╫ ╢ . ╙ ╨ ╜ }]],
);
print "<h2>Signs</h2>\n\n";
);
print "<h2>Signs</h2>\n\n";
@@
-223,3
+238,61
@@
print table(@$_) for (
],
);
],
);
+print "<h2>Japanese</h2>\n\n";
+print table(@$_) for (
+ [
+ 1 => [qw{
+ . あ い う え お =
+ . か き く け こ =
+ . さ し す せ そ =
+ . た ち つ て と =
+ . な に ぬ ね の ん
+ . は ひ ふ へ ほ =
+ . ま み む め も =
+ . や = ゆ = よ =
+ . ら り る れ ろ =
+ . わ ゐ = ゑ を =
+ }],
+ ['', qw{K S T N H M Y R W}],
+ [qw{A I U E O}, ''],
+ ],
+ [
+ 1 => [qw{
+ . が ぎ ぐ げ ご
+ . ざ じ ず ぜ ぞ
+ . だ ぢ づ で ど
+ . ば び ぶ べ ぼ
+ . ぱ ぴ ぷ ぺ ぽ
+ }],
+ [qw{G Z D B P}],
+ [qw{A I U E O}],
+ ],
+ [
+ 1 => [qw{
+ . ア イ ウ エ オ ー
+ . カ キ ク ケ コ =
+ . サ シ ス セ ソ =
+ . タ チ ツ テ ト =
+ . ナ ニ ヌ ネ ノ ン
+ . ハ ヒ フ ヘ ホ =
+ . マ ミ ム メ モ =
+ . ヤ - ユ - ヨ =
+ . ラ リ ル レ ロ =
+ . ワ ヰ - ヱ ヲ =
+ }],
+ ['', qw{K S T N H M Y R W}],
+ [qw{A I U E O}, ''],
+ ],
+ [
+ 1 => [qw{
+ . ガ ギ グ ゲ ゴ
+ . ザ ジ ズ ゼ ゾ
+ . ダ ヂ ヅ デ ド
+ . バ ビ ブ ベ ボ
+ . パ ピ プ ペ ポ
+ . ヷ ヸ ヴ ヹ ヺ
+ }],
+ [qw{G Z D B P V}],
+ [qw{A I U E O}],
+ ],
+);