writing-latn.inc.pl

   1 use utf8;
   2
   3 (
   4 latn     => [qw{ a b c d e f g h i j k l m n o p q r s t u v w x y z }],
   5 latfsuet => [qw{ a b c d e f g h i j k l m n o p q r ſ s t u v w x y z }],
   6 ase      => [qw{ a b c d e f g h i j k l m n o p q r s t u v w x y z }],
   7 brai     => [qw{ ⠁ ⠃ ⠉ ⠙ ⠑ ⠋ ⠛ ⠓ ⠊ ⠚ ⠅ ⠇ ⠍ ⠝ ⠕ ⠏ ⠟ ⠗ ⠎ ⠞ ⠥ ⠧ ⠺ ⠭ ⠽ ⠵ }],
   8 morse    => [map {tr/.-/‧‑/r} qw{
   9                 .- -... -.-. -.. . ..-. --. .... .. .--- -.- .-.. --
  10                 -. --- .--. --.- .-. ... - ..- ...- .-- -..- -.-- --..
  11             }],
  12 tap      => [qw{
  13                 11 12 13 14 15 21 22 23 24 -24 25 31 32
  14                 33 34 35 41 42 43 44 45 51 52 53 54 55
  15             }],
  16 );