/[suikacvs]/perl/charclass/lib/Char/Class/ISOIECTR10176-src.upl
Suika

Contents of /perl/charclass/lib/Char/Class/ISOIECTR10176-src.upl

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1 - (hide annotations) (download)
Sun Sep 7 01:26:15 2003 UTC (21 years, 3 months ago) by wakaba
Branch: MAIN
CVS Tags: HEAD
Bug fix

1 wakaba 1.1 #!/usr/local/bin/perl
2     use strict;
3     require 'mkpm.pl';
4     use vars qw(%PROP %SET %SET_ALIAS);
5     $PROP{module_name} = 'ISOIECTR10176';
6     $PROP{version} = do{my @r=(q$Revision: 1.1 $=~/\d+/g);sprintf "%d."."%02d" x $#r,@r};
7     $PROP{author_name} = 'Wakaba';
8     $PROP{author_mail} = 'w@suika.fam.cx';
9    
10     $PROP{pod_description} = <<EOH;
11     Recommended extended repertoire for user-defined Identifier,
12     defined by ISO/IEC TR 10176:1998 Annex A.
13    
14     ISO/IEC TR 10176:1998 Annex A says:
15    
16     The repertoire recommended consists of characters that
17     are used to write different natural langauges of the world,
18     and consists of letters, ideographic and syllabic characters,
19     digits, and some marks.
20    
21     Attention is drawn to that using extended repertoire for
22     identifiers may impact source code portability.
23     EOH
24    
25     $PROP{pod_see_also} = <<EOH;
26     ISO/IEC TR 10176:1998, "Information technology --
27     Guidelines for the preparation of programming language
28     standards", ISO/IEC, 1998-09-01 (Second edition).
29    
30     JIS TR X 0031:2000, "Information technology --
31     Guidelines for the preparation of programming language
32     standards", JISC <http://www.jisc.go.jp/>, 2000-06-01,
33     will be expired on 2005-07-31. (TR type III)
34     (IDT with ISO/IEC TR 10176:1998.)
35     EOH
36    
37     $SET{Latin} = col2list (<<EOH);
38     00 41-5A 61-7A AA BA C0-D6 D8-F6 F8-FF
39     01 00-F5 FA-FF
40     02 00-17 50-A8
41     1E 00-9B A0-F9
42     20 7F
43     EOH
44    
45     $SET{Greek} = col2list (<<EOH);
46     03 86 88-8A 8C 8E-A1 A3-CE D0-D6 DA DC DE E0 E2-F3
47     1F 00-15 18-1D 20-45 48-4D 50-57 79 5B 5D 5F-7D 80-B4 B6-BC
48     1F C2-C4 C6-CC D0-D3 D6-DB E0-EC F2-F4 F6-FC
49     EOH
50    
51     $SET{Cyrillic} = col2list (<<EOH);
52     04 01-0C 0E-0F 51-5C 5E-81 90-C4 C7-C8 CB-CC D0-EB EE-F5 F8-F9
53     EOH
54    
55     $SET{Armenian} = col2list (<<EOH);
56     05 31-56 61-87
57     EOH
58    
59     $SET{Hebrew} = col2list (<<EOH);
60     05 B0-B9 BB-BD BF C1-C2 D0-EA F0-F2
61     EOH
62    
63     $SET{Arabic} = col2list (<<EOH);
64     06 21-3A 40-52 70-B7 BA-BE C0-CE D0-DC E5-E8 EA-ED
65     EOH
66    
67     $SET{Devanagari} = col2list (<<EOH);
68     09 01-03 05-39 3E-4D 50-52 58-63
69     EOH
70    
71     $SET{Bengali} = col2list (<<EOH);
72     09 81-83 85-8C 8F-90 93-A8 AA-B0 B2 B6-B9 BE-C4 C7-C8 CB-CD
73     09 DC-DD DF-E3 F0-F1
74     EOH
75    
76     $SET{Gurmukhi} = col2list (<<EOH);
77     0A 02 05-0A 0F-10 13-28 2A-30 32-33 35-36 38-39 3E-42 47 48 4B-4D
78     0A 59-5C 5E 74
79     EOH
80    
81     $SET{Gujarati} = col2list (<<EOH);
82     0A 81-83 85-8B 8D 8F-91 93-A8 AA-B0 B2-B3 B5-B9 BD-C5 C7-C9 CB-CD D0 E0
83     EOH
84    
85     $SET{Oriya} = col2list (<<EOH);
86     0B 01-03 05-0C 0F-10 13-28 2A-30 32-33 36-39 3E-43 47-48 4B-4D 5C-5D 5F-61
87     EOH
88    
89     $SET{Tamil} = col2list (<<EOH);
90     0B 82-83 85-8A 8E-90 92-95 99-9A 9C 9E-9F A3-A4 A8-AA AE-B5
91     0B B7-B9 BE-C2 C6-C8 CA-CD
92     EOH
93    
94     $SET{Telugur} = col2list (<<EOH);
95     0C 01-03 05-0C 0E-10 12-28 2A-33 35-39 3E-44 46-48 4A-4D 60-61
96     EOH
97    
98     $SET{Kannada} = col2list (<<EOH);
99     0C 82-83 85-8C 8E-90 92-A8 AA-B3 B5-B9 BE-C4 C6-C8 CA-CC CD DE E0-E1
100     EOH
101    
102     $SET{Malayalam} = col2list (<<EOH);
103     0D 02-03 05-0C 0E-10 12-28 2A-39 3E-43 46-48 4A-4D 60-61
104     EOH
105    
106     $SET{Thai} = col2list (<<EOH);
107     0E 01-3A 40-5B
108     EOH
109    
110     $SET{Lao} = col2list (<<EOH);
111     0E 81-82 84 87-88 8A 8D 94-97 99-9F A1-A3 A5 A7 AA-AB AD-AE
112     0E B0-B9 BB-BD C0-C4 C6 C8-CD DC-DD
113     EOH
114    
115     $SET{Tibetan} = col2list (<<EOH);
116     0F 00 18-19 35 37 39 3E-47 49-69 71-84 86-8B 90-95 97 99-AD B1-B7 B9
117     EOH
118    
119     $SET{Georian} = col2list (<<EOH);
120     10 A0-C5 D0-F6
121     EOH
122    
123     $SET{Hiragana} = col2list (<<EOH);
124     30 41-93 9B-9C
125     EOH
126    
127     $SET{Katakana} = col2list (<<EOH);
128     30 A1-F6 FB-FC
129     EOH
130    
131     $SET{Bopomofo} = col2list (<<EOH);
132     31 05-2C
133     EOH
134    
135     $SET{CJKUnifiedIdeographs} = <<EOH;
136     4E00 9FA5
137     EOH
138    
139     $SET{Hangul} = <<EOH;
140     AC00-D7A3
141     EOH
142    
143     $SET{Digits} = col2list (<<EOH);
144     00 30-39
145     06 60-69 F0-F9
146     09 66-6F E6-EF
147     0A 66-6F E6-EF
148     0B 66-6F E7-EF
149     0C 66-6F E6-EF
150     0D 66-6F
151     0E 50-59 D0-D9
152     0F 20-33
153     EOH
154    
155     $SET{Special} = col2list (<<EOH);
156     #DESCRIPTION Special characters
157     00 B5 B7
158     02 B0-B8 BB BD-C1 D0-D1 E0-E4
159     03 7A 59
160     09 3D
161     0B 3D
162     1F BE
163     20 3F-40
164     21 02 07 0A-13 15 18-1D 24 26 28 2A-31 33-38 60-82
165     30 05-07 21-29
166     EOH
167    
168     &print_module;
169    
170     ## $Date: 2002/10/22 11:03:09 $

admin@suikawiki.org
ViewVC Help
Powered by ViewVC 1.1.24