1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
|
package Lingua::HI::Romanize::IAST;
use strict;
use warnings;
use utf8;
use constant TRANSLIT => (
'अ' => 'a',
'आ' => 'ā',
'इ' => 'i',
'ई' => 'ī',
'उ' => 'u',
'ऊ' => 'ū',
'ऋ' => 'ṛ',
'ॠ' => 'ṝ',
'ऌ' => 'ḷ',
'ॡ' => 'ḹ',
'ए' => 'e',
'ऐ' => 'ai',
'ओ' => 'o',
'औ' => 'au',
' ं' => 'ṃ', # ?
'ः' => 'ḥ', # ?
'क' => 'k',
'च' => 'c',
'ट' => 'ṭ',
'त' => 't',
'प' => 'p',
'ख' => 'kh',
'छ' => 'ch',
'ठ' => 'ṭh',
'थ' => 'th',
'फ' => 'ph',
'ग' => 'g',
'ज' => 'j',
'ड' => 'ḍ',
'द' => 'd',
'ब' => 'b',
'घ' => 'gh',
'झ' => 'jh',
'ढ' => 'ḍh',
'ध' => 'dh',
'भ' => 'bh',
'ङ' => 'ṅ',
'ञ' => 'ñ',
'ण' => 'ṇ',
'न' => 'n',
'म' => 'm',
'य' => 'y',
'र' => 'r',
'ल' => 'l',
'व' => 'v',
'श' => 'ś',
'ष' => 'ṣ',
'स' => 's',
'ह' => 'h',
);
1;
|