File Coverage

blib/lib/Lingua/Deva/Maps/IAST.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             package Lingua::Deva::Maps::IAST;
2              
3 6     6   70 use v5.12.1;
  6         22  
  6         295  
4 6     6   37 use strict;
  6         14  
  6         188  
5 6     6   35 use warnings;
  6         13  
  6         182  
6 6     6   30 use charnames ':full';
  6         14  
  6         35  
7              
8             # Maps for IAST transliteration
9              
10             our $CASE = 0;
11              
12             our %Consonants = (
13             "k" => "\N{DEVANAGARI LETTER KA}",
14             "kh" => "\N{DEVANAGARI LETTER KHA}",
15             "g" => "\N{DEVANAGARI LETTER GA}",
16             "gh" => "\N{DEVANAGARI LETTER GHA}",
17             "n\x{0307}" => "\N{DEVANAGARI LETTER NGA}",
18             "c" => "\N{DEVANAGARI LETTER CA}",
19             "ch" => "\N{DEVANAGARI LETTER CHA}",
20             "j" => "\N{DEVANAGARI LETTER JA}",
21             "jh" => "\N{DEVANAGARI LETTER JHA}",
22             "n\x{0303}" => "\N{DEVANAGARI LETTER NYA}",
23             "t\x{0323}" => "\N{DEVANAGARI LETTER TTA}",
24             "t\x{0323}h" => "\N{DEVANAGARI LETTER TTHA}",
25             "d\x{0323}" => "\N{DEVANAGARI LETTER DDA}",
26             "d\x{0323}h" => "\N{DEVANAGARI LETTER DDHA}",
27             "n\x{0323}" => "\N{DEVANAGARI LETTER NNA}",
28             "t" => "\N{DEVANAGARI LETTER TA}",
29             "th" => "\N{DEVANAGARI LETTER THA}",
30             "d" => "\N{DEVANAGARI LETTER DA}",
31             "dh" => "\N{DEVANAGARI LETTER DHA}",
32             "n" => "\N{DEVANAGARI LETTER NA}",
33             "p" => "\N{DEVANAGARI LETTER PA}",
34             "ph" => "\N{DEVANAGARI LETTER PHA}",
35             "b" => "\N{DEVANAGARI LETTER BA}",
36             "bh" => "\N{DEVANAGARI LETTER BHA}",
37             "m" => "\N{DEVANAGARI LETTER MA}",
38             "y" => "\N{DEVANAGARI LETTER YA}",
39             "r" => "\N{DEVANAGARI LETTER RA}",
40             "l" => "\N{DEVANAGARI LETTER LA}",
41             "v" => "\N{DEVANAGARI LETTER VA}",
42             "s\x{0301}" => "\N{DEVANAGARI LETTER SHA}",
43             "s\x{0323}" => "\N{DEVANAGARI LETTER SSA}",
44             "s" => "\N{DEVANAGARI LETTER SA}",
45             "h" => "\N{DEVANAGARI LETTER HA}",
46             );
47              
48             our %Vowels = (
49             "a" => "\N{DEVANAGARI LETTER A}",
50             "a\x{0304}" => "\N{DEVANAGARI LETTER AA}",
51             "i" => "\N{DEVANAGARI LETTER I}",
52             "i\x{0304}" => "\N{DEVANAGARI LETTER II}",
53             "u" => "\N{DEVANAGARI LETTER U}",
54             "u\x{0304}" => "\N{DEVANAGARI LETTER UU}",
55             "r\x{0323}" => "\N{DEVANAGARI LETTER VOCALIC R}",
56             "r\x{0323}\x{0304}" => "\N{DEVANAGARI LETTER VOCALIC RR}",
57             "l\x{0323}" => "\N{DEVANAGARI LETTER VOCALIC L}",
58             "l\x{0323}\x{0304}" => "\N{DEVANAGARI LETTER VOCALIC LL}",
59             "e" => "\N{DEVANAGARI LETTER E}",
60             "ai" => "\N{DEVANAGARI LETTER AI}",
61             "o" => "\N{DEVANAGARI LETTER O}",
62             "au" => "\N{DEVANAGARI LETTER AU}",
63             );
64              
65             our %Diacritics = (
66             # no diacritic for the inherent vowel
67             "a\x{0304}" => "\N{DEVANAGARI VOWEL SIGN AA}",
68             "i" => "\N{DEVANAGARI VOWEL SIGN I}",
69             "i\x{0304}" => "\N{DEVANAGARI VOWEL SIGN II}",
70             "u" => "\N{DEVANAGARI VOWEL SIGN U}",
71             "u\x{0304}" => "\N{DEVANAGARI VOWEL SIGN UU}",
72             "r\x{0323}" => "\N{DEVANAGARI VOWEL SIGN VOCALIC R}",
73             "r\x{0323}\x{0304}" => "\N{DEVANAGARI VOWEL SIGN VOCALIC RR}",
74             "l\x{0323}" => "\N{DEVANAGARI VOWEL SIGN VOCALIC L}",
75             "l\x{0323}\x{0304}" => "\N{DEVANAGARI VOWEL SIGN VOCALIC LL}",
76             "e" => "\N{DEVANAGARI VOWEL SIGN E}",
77             "ai" => "\N{DEVANAGARI VOWEL SIGN AI}",
78             "o" => "\N{DEVANAGARI VOWEL SIGN O}",
79             "au" => "\N{DEVANAGARI VOWEL SIGN AU}",
80             );
81              
82             our %Finals = (
83             "m\x{0323}" => "\N{DEVANAGARI SIGN ANUSVARA}",
84             "m\x{0310}" => "\N{DEVANAGARI SIGN CANDRABINDU}",
85             "h\x{0323}" => "\N{DEVANAGARI SIGN VISARGA}",
86             );
87              
88             1;