writing-digits.inc.pl

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