unicode: add kana tables
authorMischa POSLAWSKY <perl@shiar.org>
Thu, 9 Oct 2008 20:23:02 +0000 (20:23 +0000)
committerMischa POSLAWSKY <perl@shiar.org>
Thu, 9 Oct 2008 21:38:20 +0000 (21:38 +0000)
Simple overview of all Japanese hiragana and katakana, just because it's
digraphed, and easily tableable.

unicode.plp

index b8e16f1..242253b 100644 (file)
@@ -231,3 +231,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}],
+       ],
+);