writing-digits.inc.pl

   1 use utf8;
   2 +{
   3
   4 default  => [qw( brahmi western sign eastern )],
   5
   6 eastern  => [qw( hant hans suzhou rod )],
   7 western  => [qw( arabindi arabpers rumi ethi copt egyp xsux latnlat latn maya teng tlh osma brai )],
   8 brahmi   => [qw(
   9         khmr java bali sund talu lana lanahora laoo mlym taml cham kali mymr cakm
  10         thai knda telu tibt lepc beng olck saur orya guru gujr deva brahnumb brah
  11 )],
  12 sign     => [qw( suttus suttbe suttnl )],
  13
  14 hant     => {list => [qw{ >- 壹 貳 參 肆 伍 陸 柒 捌 玖 零 }]},
  15 hans     => {list => [qw{ 〇 一 二 三 四 五 六 七 八 九 十 }]},
  16 suzhou   => {list => [qw{ >- 〡 〢 〣 〤 〥 〦 〧 〨 〩 〸 }], title => 'Suzhou'},
  17 rod      => {list => [qw{ 〇 𝍩 𝍪 𝍫 𝍬 𝍭 𝍮 𝍯 𝍰 𝍱 𝍠 }]},
  18 ethi     => {list => [qw{>- ፩ ፪ ፫ ፬ ፭ ፮ ፯ ፰ ፱ ፲ }]},
  19 arabindi => {list => [qw{ ٠ ١ ٢ ٣ ٤ ٥ ٦ ٧ ٨ ٩ }], title => 'Arabic (Eastern)'},
  20 arabpers => {list => [qw{ ۰ ۱ ۲ ۳ ۴ ۵ ۶ ۷ ۸ ۹ }], title => 'Arabic (Persian)'},
  21
  22 khmr     => {list => [qw{ ០ ១ ២ ៣ ៤ ៥ ៦ ៧ ៨ ៩ }]},
  23 java     => {list => [qw{ ꧐ ꧑ ꧒ ꧓ ꧔ ꧕ ꧖ ꧗ ꧘ ꧙ }]},
  24 bali     => {list => [qw{ ᭐ ᭑ ᭒ ᭓ ᭔ ᭕ ᭖ ᭗ ᭘ ᭙ }]},
  25 sund     => {list => [qw{ ᮰ ᮱ ᮲ ᮳ ᮴ ᮵ ᮶ ᮷ ᮸ ᮹ }]},
  26 talu     => {list => [qw{ ᧐ ᧑ ᧒ ᧓ ᧔ ᧕ ᧖ ᧗ ᧘ ᧙ }]},
  27 lana     => {list => [qw{ ᪐ ᪑ ᪒ ᪓ ᪔ ᪕ ᪖ ᪗ ᪘ ᪙ }]},
  28 lanahora => {list => [qw{ ᪀ ᪁ ᪂ ᪃ ᪄ ᪅ ᪆ ᪇ ᪈ ᪉ }], title => 'Tai Tham Hora'},
  29 laoo     => {list => [qw{ ໐ ໑ ໒ ໓ ໔ ໕ ໖ ໗ ໘ ໙ }]},
  30 mlym     => {list => [qw{ ൦ ൧ ൨ ൩ ൪ ൫ ൬ ൭ ൮ ൯ }]},
  31 taml     => {list => [qw{>- ௧ ௨ ௩ ௪ ௫ ௬ ௭ ௮ ௯ }]},
  32 cham     => {list => [qw{ ꩐ ꩑ ꩒ ꩓ ꩔ ꩕ ꩖ ꩗ ꩘ ꩙ }]},
  33 kali     => {list => [qw{ ꤀ ꤁ ꤂ ꤃ ꤄ ꤅ ꤆ ꤇ ꤈ ꤉ }]},
  34 mymr     => {list => [qw{ ၀ ၁ ၂ ၃ ၄ ၅ ၆ ၇ ၈ ၉ }]},
  35 cakm     => {list => [qw{ 𑄶 𑄷 𑄸 𑄹 𑄺 𑄻 𑄼 𑄽 𑄾 𑄿 }]},
  36 thai     => {list => [qw{ ๐ ๑ ๒ ๓ ๔ ๕ ๖ ๗ ๘ ๙ }]},
  37 knda     => {list => [qw{ ೦ ೧ ೨ ೩ ೪ ೫ ೬ ೭ ೮ ೯ }]},
  38 telu     => {list => [qw{ ౦ ౧ ౨ ౩ ౪ ౫ ౬ ౭ ౮ ౯ }]},
  39 tibt     => {list => [qw{ ༠ ༡ ༢ ༣ ༤ ༥ ༦ ༧ ༨ ༩ }]},
  40 lepc     => {list => [qw{ ᱀ ᱁ ᱂ ᱃ ᱄ ᱅ ᱆ ᱇ ᱈ ᱉ }]},
  41 beng     => {list => [qw{ ০ ১ ২ ৩ ৪ ৫ ৬ ৭ ৮ ৯ }]},
  42 olck     => {list => [qw{ ᱐ ᱑ ᱒ ᱓ ᱔ ᱕ ᱖ ᱗ ᱘ ᱙ }]},
  43 saur     => {list => [qw{ ꣐ ꣑ ꣒ ꣓ ꣔ ꣕ ꣖ ꣗ ꣘ ꣙ }]},
  44 orya     => {list => [qw{ ୦ ୧ ୨ ୩ ୪ ୫ ୬ ୭ ୮ ୯ }]},
  45 guru     => {list => [qw{ ੦ ੧ ੨ ੩ ੪ ੫ ੬ ੭ ੮ ੯ }]},
  46 gujr     => {list => [qw{ ૦ ૧ ૨ ૩ ૪ ૫ ૬ ૭ ૮ ૯ }]},
  47 deva     => {list => [qw{ ० १ २ ३ ४ ५ ६ ७ ८ ९ }]},
  48 brahnumb => {list => [qw{>- 𑁒 𑁓 𑁔 𑁕 𑁖 𑁗 𑁘 𑁙 𑁚 𑁛 }], title => 'Brahmi numbers'},
  49 brah     => {list => [qw{ 𑁦 𑁧 𑁨 𑁩 𑁪 𑁫 𑁬 𑁭 𑁮 𑁯 }], title => 'Brahmi digits'},
  50
  51 egyp     => {list => [qw{>- 𓏺 𓏻 𓏼 𓏽 𓏾 𓏿 𓐀 𓐁 𓐂 𓎆 }]},
  52 copt     => {list => [qw{>- 𐋡 𐋢 𐋣 𐋤 𐋥 𐋦 𐋧 𐋨 𐋩 𐋪 }]},
  53 rumi     => {list => [qw{>- 𐹠 𐹡 𐹢 𐹣 𐹤 𐹥 𐹦 𐹧 𐹨 𐹩 }], title => 'Rumi numbers'},
  54 latn     => {list => [qw{ 0 1 2 3 4 5 6 7 8 9 }], title => 'Arabic (Western)'},
  55 latnlat  => {list => [qw{>- Ⅰ Ⅱ Ⅲ Ⅳ Ⅴ Ⅵ Ⅶ Ⅷ Ⅸ Ⅹ }], title => 'Roman'},
  56 xsux     => {list => [qw{>- 𒐕 𒐖 𒐗 𒐼 𒐊 𒐋 𒑂 𒑄 𒑆 𒌋 }]},
  57 maya     => {list => [qw{ 𕔀 𕔁 𕔂 𕔃 𕔄 𕔅 𕔆 𕔇 𕔈 𕔉 𕔊 }]},
  58 teng     => {list => [qw{            }]},
  59 tlh      => {list => [qw{            }]},
  60 osma     => {list => [qw{ 𐒠 𐒡 𐒢 𐒣 𐒤 𐒥 𐒦 𐒧 𐒨 𐒩 }]},
  61 brai     => {list => [qw{ ⠚ ⠁ ⠃ ⠉ ⠙ ⠑ ⠋ ⠛ ⠓ ⠊ }], title => 'Braille_[⠼+]'},
  62
  63 suttbe => {
  64         title => 'VGT',
  65         list => [map { pack 'W*', map { hex "1D$_" } unpack '(A3)*' } qw{
  66                 876a9b 800 80E 81E 844 84C
  67                 96Aaa28F5aa1 96Aaa28DCaa1 96Aaa281Eaa1 844aa492Faa4 921aa48EFa9c
  68         }],
  69 },
  70 suttnl => {
  71         title => 'NGT',
  72         list => [map { pack 'W*', map { hex "1D$_" } unpack '(A3)*' } qw{
  73                 876a9b 800 80E 886 844 84C
  74                 8F5aa1 8DCaa1 81Eaa1 88Eaa1 84Ca9c
  75         }],
  76 },
  77 suttus => {
  78         title => 'ASL',
  79         list => [map { pack 'W*', map { hex "1D$_" } unpack '(A3)*' } qw{
  80                 876a9b 800 80E 81E 844 84C
  81                 887a9c 8A5a9c 8BBa9c 8CEa9c 9A58F5aa2
  82         }],
  83 },
  84
  85 };