File Coverage

blib/lib/Locale/RecodeData/IBM285.pm
Criterion Covered Total %
statement 12 12 100.0
branch 4 4 100.0
condition 3 3 100.0
subroutine 3 3 100.0
pod n/a
total 22 22 100.0


line stmt bran cond sub pod time code
1             #! /bin/false
2             # vim: set autoindent shiftwidth=4 tabstop=4:
3              
4             # Conversion routines for IBM285.
5             # Copyright (C) 2002-2026 Guido Flohr <guido.flohr@cantanea.com>,
6             # all rights reserved.
7              
8             # This program is free software: you can redistribute it and/or modify
9             # it under the terms of the GNU General Public License as published by
10             # the Free Software Foundation; either version 3 of the License, or
11             # (at your option) any later version.
12              
13             # This program is distributed in the hope that it will be useful,
14             # but WITHOUT ANY WARRANTY; without even the implied warranty of
15             # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16             # GNU General Public License for more details.
17              
18             # You should have received a copy of the GNU General Public License
19             # along with this program. If not, see <http://www.gnu.org/licenses/>.
20              
21             package Locale::RecodeData::IBM285;
22              
23 1     1   5 use strict;
  1         1  
  1         44  
24              
25             require Locale::RecodeData;
26 1     1   8 use base qw(Locale::RecodeData);
  1         6  
  1         520  
27              
28             my @to_ucs4 = (
29             0x0000,
30             0x0001,
31             0x0002,
32             0x0003,
33             0x009c,
34             0x0009,
35             0x0086,
36             0x007f,
37             0x0097,
38             0x008d,
39             0x008e,
40             0x000b,
41             0x000c,
42             0x000d,
43             0x000e,
44             0x000f,
45             0x0010,
46             0x0011,
47             0x0012,
48             0x0013,
49             0x009d,
50             0x0085,
51             0x0008,
52             0x0087,
53             0x0018,
54             0x0019,
55             0x0092,
56             0x008f,
57             0x001c,
58             0x001d,
59             0x001e,
60             0x001f,
61             0x0080,
62             0x0081,
63             0x0082,
64             0x0083,
65             0x0084,
66             0x000a,
67             0x0017,
68             0x001b,
69             0x0088,
70             0x0089,
71             0x008a,
72             0x008b,
73             0x008c,
74             0x0005,
75             0x0006,
76             0x0007,
77             0x0090,
78             0x0091,
79             0x0016,
80             0x0093,
81             0x0094,
82             0x0095,
83             0x0096,
84             0x0004,
85             0x0098,
86             0x0099,
87             0x009a,
88             0x009b,
89             0x0014,
90             0x0015,
91             0x009e,
92             0x001a,
93             0x0020,
94             0x00a0,
95             0x00e2,
96             0x00e4,
97             0x00e0,
98             0x00e1,
99             0x00e3,
100             0x00e5,
101             0x00e7,
102             0x00f1,
103             0x0024,
104             0x002e,
105             0x003c,
106             0x0028,
107             0x002b,
108             0x007c,
109             0x0026,
110             0x00e9,
111             0x00ea,
112             0x00eb,
113             0x00e8,
114             0x00ed,
115             0x00ee,
116             0x00ef,
117             0x00ec,
118             0x00df,
119             0x0021,
120             0x00a3,
121             0x002a,
122             0x0029,
123             0x003b,
124             0x00ac,
125             0x002d,
126             0x002f,
127             0x00c2,
128             0x00c4,
129             0x00c0,
130             0x00c1,
131             0x00c3,
132             0x00c5,
133             0x00c7,
134             0x00d1,
135             0x00a6,
136             0x002c,
137             0x0025,
138             0x005f,
139             0x003e,
140             0x003f,
141             0x00f8,
142             0x00c9,
143             0x00ca,
144             0x00cb,
145             0x00c8,
146             0x00cd,
147             0x00ce,
148             0x00cf,
149             0x00cc,
150             0x0060,
151             0x003a,
152             0x0023,
153             0x0040,
154             0x0027,
155             0x003d,
156             0x0022,
157             0x00d8,
158             0x0061,
159             0x0062,
160             0x0063,
161             0x0064,
162             0x0065,
163             0x0066,
164             0x0067,
165             0x0068,
166             0x0069,
167             0x00ab,
168             0x00bb,
169             0x00f0,
170             0x00fd,
171             0x00fe,
172             0x00b1,
173             0x00b0,
174             0x006a,
175             0x006b,
176             0x006c,
177             0x006d,
178             0x006e,
179             0x006f,
180             0x0070,
181             0x0071,
182             0x0072,
183             0x00aa,
184             0x00ba,
185             0x00e6,
186             0x00b8,
187             0x00c6,
188             0x00a4,
189             0x00b5,
190             0x203e,
191             0x0073,
192             0x0074,
193             0x0075,
194             0x0076,
195             0x0077,
196             0x0078,
197             0x0079,
198             0x007a,
199             0x00a1,
200             0x00bf,
201             0x00d0,
202             0x00dd,
203             0x00de,
204             0x00ae,
205             0x00a2,
206             0x005b,
207             0x00a5,
208             0x00b7,
209             0x00a9,
210             0x00a7,
211             0x00b6,
212             0x00bc,
213             0x00bd,
214             0x00be,
215             0x005e,
216             0x005d,
217             0x007e,
218             0x00a8,
219             0x00b4,
220             0x00d7,
221             0x007b,
222             0x0041,
223             0x0042,
224             0x0043,
225             0x0044,
226             0x0045,
227             0x0046,
228             0x0047,
229             0x0048,
230             0x0049,
231             0x00ad,
232             0x00f4,
233             0x00f6,
234             0x00f2,
235             0x00f3,
236             0x00f5,
237             0x007d,
238             0x004a,
239             0x004b,
240             0x004c,
241             0x004d,
242             0x004e,
243             0x004f,
244             0x0050,
245             0x0051,
246             0x0052,
247             0x00b9,
248             0x00fb,
249             0x00fc,
250             0x00f9,
251             0x00fa,
252             0x00ff,
253             0x005c,
254             0x00f7,
255             0x0053,
256             0x0054,
257             0x0055,
258             0x0056,
259             0x0057,
260             0x0058,
261             0x0059,
262             0x005a,
263             0x00b2,
264             0x00d4,
265             0x00d6,
266             0x00d2,
267             0x00d3,
268             0x00d5,
269             0x0030,
270             0x0031,
271             0x0032,
272             0x0033,
273             0x0034,
274             0x0035,
275             0x0036,
276             0x0037,
277             0x0038,
278             0x0039,
279             0x00b3,
280             0x00db,
281             0x00dc,
282             0x00d9,
283             0x00da,
284             0x009f,
285             );
286              
287             my @to_utf8 = (
288             "\x00",
289             "\x01",
290             "\x02",
291             "\x03",
292             "\xc2\x9c",
293             "\x09",
294             "\xc2\x86",
295             "\x7f",
296             "\xc2\x97",
297             "\xc2\x8d",
298             "\xc2\x8e",
299             "\x0b",
300             "\x0c",
301             "\x0d",
302             "\x0e",
303             "\x0f",
304             "\x10",
305             "\x11",
306             "\x12",
307             "\x13",
308             "\xc2\x9d",
309             "\xc2\x85",
310             "\x08",
311             "\xc2\x87",
312             "\x18",
313             "\x19",
314             "\xc2\x92",
315             "\xc2\x8f",
316             "\x1c",
317             "\x1d",
318             "\x1e",
319             "\x1f",
320             "\xc2\x80",
321             "\xc2\x81",
322             "\xc2\x82",
323             "\xc2\x83",
324             "\xc2\x84",
325             "\x0a",
326             "\x17",
327             "\x1b",
328             "\xc2\x88",
329             "\xc2\x89",
330             "\xc2\x8a",
331             "\xc2\x8b",
332             "\xc2\x8c",
333             "\x05",
334             "\x06",
335             "\x07",
336             "\xc2\x90",
337             "\xc2\x91",
338             "\x16",
339             "\xc2\x93",
340             "\xc2\x94",
341             "\xc2\x95",
342             "\xc2\x96",
343             "\x04",
344             "\xc2\x98",
345             "\xc2\x99",
346             "\xc2\x9a",
347             "\xc2\x9b",
348             "\x14",
349             "\x15",
350             "\xc2\x9e",
351             "\x1a",
352             "\x20",
353             "\xc2\xa0",
354             "\xc3\xa2",
355             "\xc3\xa4",
356             "\xc3\xa0",
357             "\xc3\xa1",
358             "\xc3\xa3",
359             "\xc3\xa5",
360             "\xc3\xa7",
361             "\xc3\xb1",
362             "\x24",
363             "\x2e",
364             "\x3c",
365             "\x28",
366             "\x2b",
367             "\x7c",
368             "\x26",
369             "\xc3\xa9",
370             "\xc3\xaa",
371             "\xc3\xab",
372             "\xc3\xa8",
373             "\xc3\xad",
374             "\xc3\xae",
375             "\xc3\xaf",
376             "\xc3\xac",
377             "\xc3\x9f",
378             "\x21",
379             "\xc2\xa3",
380             "\x2a",
381             "\x29",
382             "\x3b",
383             "\xc2\xac",
384             "\x2d",
385             "\x2f",
386             "\xc3\x82",
387             "\xc3\x84",
388             "\xc3\x80",
389             "\xc3\x81",
390             "\xc3\x83",
391             "\xc3\x85",
392             "\xc3\x87",
393             "\xc3\x91",
394             "\xc2\xa6",
395             "\x2c",
396             "\x25",
397             "\x5f",
398             "\x3e",
399             "\x3f",
400             "\xc3\xb8",
401             "\xc3\x89",
402             "\xc3\x8a",
403             "\xc3\x8b",
404             "\xc3\x88",
405             "\xc3\x8d",
406             "\xc3\x8e",
407             "\xc3\x8f",
408             "\xc3\x8c",
409             "\x60",
410             "\x3a",
411             "\x23",
412             "\x40",
413             "\x27",
414             "\x3d",
415             "\x22",
416             "\xc3\x98",
417             "\x61",
418             "\x62",
419             "\x63",
420             "\x64",
421             "\x65",
422             "\x66",
423             "\x67",
424             "\x68",
425             "\x69",
426             "\xc2\xab",
427             "\xc2\xbb",
428             "\xc3\xb0",
429             "\xc3\xbd",
430             "\xc3\xbe",
431             "\xc2\xb1",
432             "\xc2\xb0",
433             "\x6a",
434             "\x6b",
435             "\x6c",
436             "\x6d",
437             "\x6e",
438             "\x6f",
439             "\x70",
440             "\x71",
441             "\x72",
442             "\xc2\xaa",
443             "\xc2\xba",
444             "\xc3\xa6",
445             "\xc2\xb8",
446             "\xc3\x86",
447             "\xc2\xa4",
448             "\xc2\xb5",
449             "\xe2\x80\xbe",
450             "\x73",
451             "\x74",
452             "\x75",
453             "\x76",
454             "\x77",
455             "\x78",
456             "\x79",
457             "\x7a",
458             "\xc2\xa1",
459             "\xc2\xbf",
460             "\xc3\x90",
461             "\xc3\x9d",
462             "\xc3\x9e",
463             "\xc2\xae",
464             "\xc2\xa2",
465             "\x5b",
466             "\xc2\xa5",
467             "\xc2\xb7",
468             "\xc2\xa9",
469             "\xc2\xa7",
470             "\xc2\xb6",
471             "\xc2\xbc",
472             "\xc2\xbd",
473             "\xc2\xbe",
474             "\x5e",
475             "\x5d",
476             "\x7e",
477             "\xc2\xa8",
478             "\xc2\xb4",
479             "\xc3\x97",
480             "\x7b",
481             "\x41",
482             "\x42",
483             "\x43",
484             "\x44",
485             "\x45",
486             "\x46",
487             "\x47",
488             "\x48",
489             "\x49",
490             "\xc2\xad",
491             "\xc3\xb4",
492             "\xc3\xb6",
493             "\xc3\xb2",
494             "\xc3\xb3",
495             "\xc3\xb5",
496             "\x7d",
497             "\x4a",
498             "\x4b",
499             "\x4c",
500             "\x4d",
501             "\x4e",
502             "\x4f",
503             "\x50",
504             "\x51",
505             "\x52",
506             "\xc2\xb9",
507             "\xc3\xbb",
508             "\xc3\xbc",
509             "\xc3\xb9",
510             "\xc3\xba",
511             "\xc3\xbf",
512             "\x5c",
513             "\xc3\xb7",
514             "\x53",
515             "\x54",
516             "\x55",
517             "\x56",
518             "\x57",
519             "\x58",
520             "\x59",
521             "\x5a",
522             "\xc2\xb2",
523             "\xc3\x94",
524             "\xc3\x96",
525             "\xc3\x92",
526             "\xc3\x93",
527             "\xc3\x95",
528             "\x30",
529             "\x31",
530             "\x32",
531             "\x33",
532             "\x34",
533             "\x35",
534             "\x36",
535             "\x37",
536             "\x38",
537             "\x39",
538             "\xc2\xb3",
539             "\xc3\x9b",
540             "\xc3\x9c",
541             "\xc3\x99",
542             "\xc3\x9a",
543             "\xc2\x9f",
544             );
545              
546             my %from_ucs4 = (
547             0x00000000 => "\x00",
548             0x00000001 => "\x01",
549             0x00000002 => "\x02",
550             0x00000003 => "\x03",
551             0x00000004 => "\x37",
552             0x00000005 => "\x2d",
553             0x00000006 => "\x2e",
554             0x00000007 => "\x2f",
555             0x00000008 => "\x16",
556             0x00000009 => "\x05",
557             0x0000000a => "\x25",
558             0x0000000b => "\x0b",
559             0x0000000c => "\x0c",
560             0x0000000d => "\x0d",
561             0x0000000e => "\x0e",
562             0x0000000f => "\x0f",
563             0x00000010 => "\x10",
564             0x00000011 => "\x11",
565             0x00000012 => "\x12",
566             0x00000013 => "\x13",
567             0x00000014 => "\x3c",
568             0x00000015 => "\x3d",
569             0x00000016 => "\x32",
570             0x00000017 => "\x26",
571             0x00000018 => "\x18",
572             0x00000019 => "\x19",
573             0x0000001a => "\x3f",
574             0x0000001b => "\x27",
575             0x0000001c => "\x1c",
576             0x0000001d => "\x1d",
577             0x0000001e => "\x1e",
578             0x0000001f => "\x1f",
579             0x00000020 => "\x40",
580             0x00000021 => "\x5a",
581             0x00000022 => "\x7f",
582             0x00000023 => "\x7b",
583             0x00000024 => "\x4a",
584             0x00000025 => "\x6c",
585             0x00000026 => "\x50",
586             0x00000027 => "\x7d",
587             0x00000028 => "\x4d",
588             0x00000029 => "\x5d",
589             0x0000002a => "\x5c",
590             0x0000002b => "\x4e",
591             0x0000002c => "\x6b",
592             0x0000002d => "\x60",
593             0x0000002e => "\x4b",
594             0x0000002f => "\x61",
595             0x00000030 => "\xf0",
596             0x00000031 => "\xf1",
597             0x00000032 => "\xf2",
598             0x00000033 => "\xf3",
599             0x00000034 => "\xf4",
600             0x00000035 => "\xf5",
601             0x00000036 => "\xf6",
602             0x00000037 => "\xf7",
603             0x00000038 => "\xf8",
604             0x00000039 => "\xf9",
605             0x0000003a => "\x7a",
606             0x0000003b => "\x5e",
607             0x0000003c => "\x4c",
608             0x0000003d => "\x7e",
609             0x0000003e => "\x6e",
610             0x0000003f => "\x6f",
611             0x00000040 => "\x7c",
612             0x00000041 => "\xc1",
613             0x00000042 => "\xc2",
614             0x00000043 => "\xc3",
615             0x00000044 => "\xc4",
616             0x00000045 => "\xc5",
617             0x00000046 => "\xc6",
618             0x00000047 => "\xc7",
619             0x00000048 => "\xc8",
620             0x00000049 => "\xc9",
621             0x0000004a => "\xd1",
622             0x0000004b => "\xd2",
623             0x0000004c => "\xd3",
624             0x0000004d => "\xd4",
625             0x0000004e => "\xd5",
626             0x0000004f => "\xd6",
627             0x00000050 => "\xd7",
628             0x00000051 => "\xd8",
629             0x00000052 => "\xd9",
630             0x00000053 => "\xe2",
631             0x00000054 => "\xe3",
632             0x00000055 => "\xe4",
633             0x00000056 => "\xe5",
634             0x00000057 => "\xe6",
635             0x00000058 => "\xe7",
636             0x00000059 => "\xe8",
637             0x0000005a => "\xe9",
638             0x0000005b => "\xb1",
639             0x0000005c => "\xe0",
640             0x0000005d => "\xbb",
641             0x0000005e => "\xba",
642             0x0000005f => "\x6d",
643             0x00000060 => "\x79",
644             0x00000061 => "\x81",
645             0x00000062 => "\x82",
646             0x00000063 => "\x83",
647             0x00000064 => "\x84",
648             0x00000065 => "\x85",
649             0x00000066 => "\x86",
650             0x00000067 => "\x87",
651             0x00000068 => "\x88",
652             0x00000069 => "\x89",
653             0x0000006a => "\x91",
654             0x0000006b => "\x92",
655             0x0000006c => "\x93",
656             0x0000006d => "\x94",
657             0x0000006e => "\x95",
658             0x0000006f => "\x96",
659             0x00000070 => "\x97",
660             0x00000071 => "\x98",
661             0x00000072 => "\x99",
662             0x00000073 => "\xa2",
663             0x00000074 => "\xa3",
664             0x00000075 => "\xa4",
665             0x00000076 => "\xa5",
666             0x00000077 => "\xa6",
667             0x00000078 => "\xa7",
668             0x00000079 => "\xa8",
669             0x0000007a => "\xa9",
670             0x0000007b => "\xc0",
671             0x0000007c => "\x4f",
672             0x0000007d => "\xd0",
673             0x0000007e => "\xbc",
674             0x0000007f => "\x07",
675             0x00000080 => "\x20",
676             0x00000081 => "\x21",
677             0x00000082 => "\x22",
678             0x00000083 => "\x23",
679             0x00000084 => "\x24",
680             0x00000085 => "\x15",
681             0x00000086 => "\x06",
682             0x00000087 => "\x17",
683             0x00000088 => "\x28",
684             0x00000089 => "\x29",
685             0x0000008a => "\x2a",
686             0x0000008b => "\x2b",
687             0x0000008c => "\x2c",
688             0x0000008d => "\x09",
689             0x0000008e => "\x0a",
690             0x0000008f => "\x1b",
691             0x00000090 => "\x30",
692             0x00000091 => "\x31",
693             0x00000092 => "\x1a",
694             0x00000093 => "\x33",
695             0x00000094 => "\x34",
696             0x00000095 => "\x35",
697             0x00000096 => "\x36",
698             0x00000097 => "\x08",
699             0x00000098 => "\x38",
700             0x00000099 => "\x39",
701             0x0000009a => "\x3a",
702             0x0000009b => "\x3b",
703             0x0000009c => "\x04",
704             0x0000009d => "\x14",
705             0x0000009e => "\x3e",
706             0x0000009f => "\xff",
707             0x000000a0 => "\x41",
708             0x000000a1 => "\xaa",
709             0x000000a2 => "\xb0",
710             0x000000a3 => "\x5b",
711             0x000000a4 => "\x9f",
712             0x000000a5 => "\xb2",
713             0x000000a6 => "\x6a",
714             0x000000a7 => "\xb5",
715             0x000000a8 => "\xbd",
716             0x000000a9 => "\xb4",
717             0x000000aa => "\x9a",
718             0x000000ab => "\x8a",
719             0x000000ac => "\x5f",
720             0x000000ad => "\xca",
721             0x000000ae => "\xaf",
722             0x000000b0 => "\x90",
723             0x000000b1 => "\x8f",
724             0x000000b2 => "\xea",
725             0x000000b3 => "\xfa",
726             0x000000b4 => "\xbe",
727             0x000000b5 => "\xa0",
728             0x000000b6 => "\xb6",
729             0x000000b7 => "\xb3",
730             0x000000b8 => "\x9d",
731             0x000000b9 => "\xda",
732             0x000000ba => "\x9b",
733             0x000000bb => "\x8b",
734             0x000000bc => "\xb7",
735             0x000000bd => "\xb8",
736             0x000000be => "\xb9",
737             0x000000bf => "\xab",
738             0x000000c0 => "\x64",
739             0x000000c1 => "\x65",
740             0x000000c2 => "\x62",
741             0x000000c3 => "\x66",
742             0x000000c4 => "\x63",
743             0x000000c5 => "\x67",
744             0x000000c6 => "\x9e",
745             0x000000c7 => "\x68",
746             0x000000c8 => "\x74",
747             0x000000c9 => "\x71",
748             0x000000ca => "\x72",
749             0x000000cb => "\x73",
750             0x000000cc => "\x78",
751             0x000000cd => "\x75",
752             0x000000ce => "\x76",
753             0x000000cf => "\x77",
754             0x000000d0 => "\xac",
755             0x000000d1 => "\x69",
756             0x000000d2 => "\xed",
757             0x000000d3 => "\xee",
758             0x000000d4 => "\xeb",
759             0x000000d5 => "\xef",
760             0x000000d6 => "\xec",
761             0x000000d7 => "\xbf",
762             0x000000d8 => "\x80",
763             0x000000d9 => "\xfd",
764             0x000000da => "\xfe",
765             0x000000db => "\xfb",
766             0x000000dc => "\xfc",
767             0x000000dd => "\xad",
768             0x000000de => "\xae",
769             0x000000df => "\x59",
770             0x000000e0 => "\x44",
771             0x000000e1 => "\x45",
772             0x000000e2 => "\x42",
773             0x000000e3 => "\x46",
774             0x000000e4 => "\x43",
775             0x000000e5 => "\x47",
776             0x000000e6 => "\x9c",
777             0x000000e7 => "\x48",
778             0x000000e8 => "\x54",
779             0x000000e9 => "\x51",
780             0x000000ea => "\x52",
781             0x000000eb => "\x53",
782             0x000000ec => "\x58",
783             0x000000ed => "\x55",
784             0x000000ee => "\x56",
785             0x000000ef => "\x57",
786             0x000000f0 => "\x8c",
787             0x000000f1 => "\x49",
788             0x000000f2 => "\xcd",
789             0x000000f3 => "\xce",
790             0x000000f4 => "\xcb",
791             0x000000f5 => "\xcf",
792             0x000000f6 => "\xcc",
793             0x000000f7 => "\xe1",
794             0x000000f8 => "\x70",
795             0x000000f9 => "\xdd",
796             0x000000fa => "\xde",
797             0x000000fb => "\xdb",
798             0x000000fc => "\xdc",
799             0x000000fd => "\x8d",
800             0x000000fe => "\x8e",
801             0x000000ff => "\xdf",
802             0x0000203e => "\xa1",
803             );
804              
805             sub _recode
806             {
807 770 100   770   1124 if ($_[0]->{_from} eq 'INTERNAL') {
    100          
808             $_[1] = join '',
809             map $from_ucs4{$_}
810             || (defined $from_ucs4{$_} ? $from_ucs4{$_} : "\x6f"),
811 258   100     254 @{$_[1]};
  258         597  
812             } elsif ($_[0]->{_to} eq 'UTF-8',) {
813 256         452 $_[1] = join '', map $to_utf8[$_], unpack 'C*', $_[1];
814             } else {
815 256         472 $_[1] = [ map
816             $to_ucs4[$_],
817             unpack 'C*', $_[1]
818             ];
819             }
820              
821 770         1063 return 1;
822             }
823              
824             1;
825              
826             __END__
827              
828             =head1 NAME
829              
830             Locale::RecodeData::IBM285 - Conversion routines for IBM285
831              
832             =head1 SYNOPSIS
833              
834             This module is internal to libintl. Do not use directly!
835              
836             =head1 DESCRIPTION
837              
838             This module is generated and contains the conversion tables and
839             routines for IBM285.
840              
841             =head1 COMMENTS
842              
843             The following comments have been extracted from the original charmap:
844              
845             version: 1.0
846             source: IBM NLS RM Vol2 SE09-8002-01, March 1990
847             alias CP285
848             alias EBCDIC-CP-GB
849              
850             Please note that aliases listed above are not necessarily valid!
851              
852             =head1 CHARACTER TABLE
853              
854             The following table is sorted in the same order as the original charmap.
855             All character codes are in hexadecimal. Please read 'ISO-10646' as
856             'ISO-10646-UCS4'.
857              
858             Local | ISO-10646 | Description
859             -------+-----------+-------------------------------------------------
860             00 | 00000000 | NULL (NUL)
861             01 | 00000001 | START OF HEADING (SOH)
862             02 | 00000002 | START OF TEXT (STX)
863             03 | 00000003 | END OF TEXT (ETX)
864             04 | 0000009C | STRING TERMINATOR (ST)
865             05 | 00000009 | CHARACTER TABULATION (HT)
866             06 | 00000086 | START OF SELECTED AREA (SSA)
867             07 | 0000007F | DELETE (DEL)
868             08 | 00000097 | END OF GUARDED AREA (EPA)
869             09 | 0000008D | REVERSE LINE FEED (RI)
870             0A | 0000008E | SINGLE-SHIFT TWO (SS2)
871             0B | 0000000B | LINE TABULATION (VT)
872             0C | 0000000C | FORM FEED (FF)
873             0D | 0000000D | CARRIAGE RETURN (CR)
874             0E | 0000000E | SHIFT OUT (SO)
875             0F | 0000000F | SHIFT IN (SI)
876             10 | 00000010 | DATALINK ESCAPE (DLE)
877             11 | 00000011 | DEVICE CONTROL ONE (DC1)
878             12 | 00000012 | DEVICE CONTROL TWO (DC2)
879             13 | 00000013 | DEVICE CONTROL THREE (DC3)
880             14 | 0000009D | OPERATING SYSTEM COMMAND (OSC)
881             15 | 00000085 | NEXT LINE (NEL)
882             16 | 00000008 | BACKSPACE (BS)
883             17 | 00000087 | END OF SELECTED AREA (ESA)
884             18 | 00000018 | CANCEL (CAN)
885             19 | 00000019 | END OF MEDIUM (EM)
886             1A | 00000092 | PRIVATE USE TWO (PU2)
887             1B | 0000008F | SINGLE-SHIFT THREE (SS3)
888             1C | 0000001C | FILE SEPARATOR (IS4)
889             1D | 0000001D | GROUP SEPARATOR (IS3)
890             1E | 0000001E | RECORD SEPARATOR (IS2)
891             1F | 0000001F | UNIT SEPARATOR (IS1)
892             20 | 00000080 | PADDING CHARACTER (PAD)
893             21 | 00000081 | HIGH OCTET PRESET (HOP)
894             22 | 00000082 | BREAK PERMITTED HERE (BPH)
895             23 | 00000083 | NO BREAK HERE (NBH)
896             24 | 00000084 | INDEX (IND)
897             25 | 0000000A | LINE FEED (LF)
898             26 | 00000017 | END OF TRANSMISSION BLOCK (ETB)
899             27 | 0000001B | ESCAPE (ESC)
900             28 | 00000088 | CHARACTER TABULATION SET (HTS)
901             29 | 00000089 | CHARACTER TABULATION WITH JUSTIFICATION (HTJ)
902             2A | 0000008A | LINE TABULATION SET (VTS)
903             2B | 0000008B | PARTIAL LINE FORWARD (PLD)
904             2C | 0000008C | PARTIAL LINE BACKWARD (PLU)
905             2D | 00000005 | ENQUIRY (ENQ)
906             2E | 00000006 | ACKNOWLEDGE (ACK)
907             2F | 00000007 | BELL (BEL)
908             30 | 00000090 | DEVICE CONTROL STRING (DCS)
909             31 | 00000091 | PRIVATE USE ONE (PU1)
910             32 | 00000016 | SYNCHRONOUS IDLE (SYN)
911             33 | 00000093 | SET TRANSMIT STATE (STS)
912             34 | 00000094 | CANCEL CHARACTER (CCH)
913             35 | 00000095 | MESSAGE WAITING (MW)
914             36 | 00000096 | START OF GUARDED AREA (SPA)
915             37 | 00000004 | END OF TRANSMISSION (EOT)
916             38 | 00000098 | START OF STRING (SOS)
917             39 | 00000099 | SINGLE GRAPHIC CHARACTER INTRODUCER (SGCI)
918             3A | 0000009A | SINGLE CHARACTER INTRODUCER (SCI)
919             3B | 0000009B | CONTROL SEQUENCE INTRODUCER (CSI)
920             3C | 00000014 | DEVICE CONTROL FOUR (DC4)
921             3D | 00000015 | NEGATIVE ACKNOWLEDGE (NAK)
922             3E | 0000009E | PRIVACY MESSAGE (PM)
923             3F | 0000001A | SUBSTITUTE (SUB)
924             40 | 00000020 | SPACE
925             41 | 000000A0 | NO-BREAK SPACE
926             42 | 000000E2 | LATIN SMALL LETTER A WITH CIRCUMFLEX
927             43 | 000000E4 | LATIN SMALL LETTER A WITH DIAERESIS
928             44 | 000000E0 | LATIN SMALL LETTER A WITH GRAVE
929             45 | 000000E1 | LATIN SMALL LETTER A WITH ACUTE
930             46 | 000000E3 | LATIN SMALL LETTER A WITH TILDE
931             47 | 000000E5 | LATIN SMALL LETTER A WITH RING ABOVE
932             48 | 000000E7 | LATIN SMALL LETTER C WITH CEDILLA
933             49 | 000000F1 | LATIN SMALL LETTER N WITH TILDE
934             4A | 00000024 | DOLLAR SIGN
935             4B | 0000002E | FULL STOP
936             4C | 0000003C | LESS-THAN SIGN
937             4D | 00000028 | LEFT PARENTHESIS
938             4E | 0000002B | PLUS SIGN
939             4F | 0000007C | VERTICAL LINE
940             50 | 00000026 | AMPERSAND
941             51 | 000000E9 | LATIN SMALL LETTER E WITH ACUTE
942             52 | 000000EA | LATIN SMALL LETTER E WITH CIRCUMFLEX
943             53 | 000000EB | LATIN SMALL LETTER E WITH DIAERESIS
944             54 | 000000E8 | LATIN SMALL LETTER E WITH GRAVE
945             55 | 000000ED | LATIN SMALL LETTER I WITH ACUTE
946             56 | 000000EE | LATIN SMALL LETTER I WITH CIRCUMFLEX
947             57 | 000000EF | LATIN SMALL LETTER I WITH DIAERESIS
948             58 | 000000EC | LATIN SMALL LETTER I WITH GRAVE
949             59 | 000000DF | LATIN SMALL LETTER SHARP S (German)
950             5A | 00000021 | EXCLAMATION MARK
951             5B | 000000A3 | POUND SIGN
952             5C | 0000002A | ASTERISK
953             5D | 00000029 | RIGHT PARENTHESIS
954             5E | 0000003B | SEMICOLON
955             5F | 000000AC | NOT SIGN
956             60 | 0000002D | HYPHEN-MINUS
957             61 | 0000002F | SOLIDUS
958             62 | 000000C2 | LATIN CAPITAL LETTER A WITH CIRCUMFLEX
959             63 | 000000C4 | LATIN CAPITAL LETTER A WITH DIAERESIS
960             64 | 000000C0 | LATIN CAPITAL LETTER A WITH GRAVE
961             65 | 000000C1 | LATIN CAPITAL LETTER A WITH ACUTE
962             66 | 000000C3 | LATIN CAPITAL LETTER A WITH TILDE
963             67 | 000000C5 | LATIN CAPITAL LETTER A WITH RING ABOVE
964             68 | 000000C7 | LATIN CAPITAL LETTER C WITH CEDILLA
965             69 | 000000D1 | LATIN CAPITAL LETTER N WITH TILDE
966             6A | 000000A6 | BROKEN BAR
967             6B | 0000002C | COMMA
968             6C | 00000025 | PERCENT SIGN
969             6D | 0000005F | LOW LINE
970             6E | 0000003E | GREATER-THAN SIGN
971             6F | 0000003F | QUESTION MARK
972             70 | 000000F8 | LATIN SMALL LETTER O WITH STROKE
973             71 | 000000C9 | LATIN CAPITAL LETTER E WITH ACUTE
974             72 | 000000CA | LATIN CAPITAL LETTER E WITH CIRCUMFLEX
975             73 | 000000CB | LATIN CAPITAL LETTER E WITH DIAERESIS
976             74 | 000000C8 | LATIN CAPITAL LETTER E WITH GRAVE
977             75 | 000000CD | LATIN CAPITAL LETTER I WITH ACUTE
978             76 | 000000CE | LATIN CAPITAL LETTER I WITH CIRCUMFLEX
979             77 | 000000CF | LATIN CAPITAL LETTER I WITH DIAERESIS
980             78 | 000000CC | LATIN CAPITAL LETTER I WITH GRAVE
981             79 | 00000060 | GRAVE ACCENT
982             7A | 0000003A | COLON
983             7B | 00000023 | NUMBER SIGN
984             7C | 00000040 | COMMERCIAL AT
985             7D | 00000027 | APOSTROPHE
986             7E | 0000003D | EQUALS SIGN
987             7F | 00000022 | QUOTATION MARK
988             80 | 000000D8 | LATIN CAPITAL LETTER O WITH STROKE
989             81 | 00000061 | LATIN SMALL LETTER A
990             82 | 00000062 | LATIN SMALL LETTER B
991             83 | 00000063 | LATIN SMALL LETTER C
992             84 | 00000064 | LATIN SMALL LETTER D
993             85 | 00000065 | LATIN SMALL LETTER E
994             86 | 00000066 | LATIN SMALL LETTER F
995             87 | 00000067 | LATIN SMALL LETTER G
996             88 | 00000068 | LATIN SMALL LETTER H
997             89 | 00000069 | LATIN SMALL LETTER I
998             8A | 000000AB | LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
999             8B | 000000BB | RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
1000             8C | 000000F0 | LATIN SMALL LETTER ETH (Icelandic)
1001             8D | 000000FD | LATIN SMALL LETTER Y WITH ACUTE
1002             8E | 000000FE | LATIN SMALL LETTER THORN (Icelandic)
1003             8F | 000000B1 | PLUS-MINUS SIGN
1004             90 | 000000B0 | DEGREE SIGN
1005             91 | 0000006A | LATIN SMALL LETTER J
1006             92 | 0000006B | LATIN SMALL LETTER K
1007             93 | 0000006C | LATIN SMALL LETTER L
1008             94 | 0000006D | LATIN SMALL LETTER M
1009             95 | 0000006E | LATIN SMALL LETTER N
1010             96 | 0000006F | LATIN SMALL LETTER O
1011             97 | 00000070 | LATIN SMALL LETTER P
1012             98 | 00000071 | LATIN SMALL LETTER Q
1013             99 | 00000072 | LATIN SMALL LETTER R
1014             9A | 000000AA | FEMININE ORDINAL INDICATOR
1015             9B | 000000BA | MASCULINE ORDINAL INDICATOR
1016             9C | 000000E6 | LATIN SMALL LETTER AE
1017             9D | 000000B8 | CEDILLA
1018             9E | 000000C6 | LATIN CAPITAL LETTER AE
1019             9F | 000000A4 | CURRENCY SIGN
1020             A0 | 000000B5 | MICRO SIGN
1021             A1 | 0000203E | OVERLINE
1022             A2 | 00000073 | LATIN SMALL LETTER S
1023             A3 | 00000074 | LATIN SMALL LETTER T
1024             A4 | 00000075 | LATIN SMALL LETTER U
1025             A5 | 00000076 | LATIN SMALL LETTER V
1026             A6 | 00000077 | LATIN SMALL LETTER W
1027             A7 | 00000078 | LATIN SMALL LETTER X
1028             A8 | 00000079 | LATIN SMALL LETTER Y
1029             A9 | 0000007A | LATIN SMALL LETTER Z
1030             AA | 000000A1 | INVERTED EXCLAMATION MARK
1031             AB | 000000BF | INVERTED QUESTION MARK
1032             AC | 000000D0 | LATIN CAPITAL LETTER ETH (Icelandic)
1033             AD | 000000DD | LATIN CAPITAL LETTER Y WITH ACUTE
1034             AE | 000000DE | LATIN CAPITAL LETTER THORN (Icelandic)
1035             AF | 000000AE | REGISTERED SIGN
1036             B0 | 000000A2 | CENT SIGN
1037             B1 | 0000005B | LEFT SQUARE BRACKET
1038             B2 | 000000A5 | YEN SIGN
1039             B3 | 000000B7 | MIDDLE DOT
1040             B4 | 000000A9 | COPYRIGHT SIGN
1041             B5 | 000000A7 | SECTION SIGN
1042             B6 | 000000B6 | PILCROW SIGN
1043             B7 | 000000BC | VULGAR FRACTION ONE QUARTER
1044             B8 | 000000BD | VULGAR FRACTION ONE HALF
1045             B9 | 000000BE | VULGAR FRACTION THREE QUARTERS
1046             BA | 0000005E | CIRCUMFLEX ACCENT
1047             BB | 0000005D | RIGHT SQUARE BRACKET
1048             BC | 0000007E | TILDE
1049             BD | 000000A8 | DIAERESIS
1050             BE | 000000B4 | ACUTE ACCENT
1051             BF | 000000D7 | MULTIPLICATION SIGN
1052             C0 | 0000007B | LEFT CURLY BRACKET
1053             C1 | 00000041 | LATIN CAPITAL LETTER A
1054             C2 | 00000042 | LATIN CAPITAL LETTER B
1055             C3 | 00000043 | LATIN CAPITAL LETTER C
1056             C4 | 00000044 | LATIN CAPITAL LETTER D
1057             C5 | 00000045 | LATIN CAPITAL LETTER E
1058             C6 | 00000046 | LATIN CAPITAL LETTER F
1059             C7 | 00000047 | LATIN CAPITAL LETTER G
1060             C8 | 00000048 | LATIN CAPITAL LETTER H
1061             C9 | 00000049 | LATIN CAPITAL LETTER I
1062             CA | 000000AD | SOFT HYPHEN
1063             CB | 000000F4 | LATIN SMALL LETTER O WITH CIRCUMFLEX
1064             CC | 000000F6 | LATIN SMALL LETTER O WITH DIAERESIS
1065             CD | 000000F2 | LATIN SMALL LETTER O WITH GRAVE
1066             CE | 000000F3 | LATIN SMALL LETTER O WITH ACUTE
1067             CF | 000000F5 | LATIN SMALL LETTER O WITH TILDE
1068             D0 | 0000007D | RIGHT CURLY BRACKET
1069             D1 | 0000004A | LATIN CAPITAL LETTER J
1070             D2 | 0000004B | LATIN CAPITAL LETTER K
1071             D3 | 0000004C | LATIN CAPITAL LETTER L
1072             D4 | 0000004D | LATIN CAPITAL LETTER M
1073             D5 | 0000004E | LATIN CAPITAL LETTER N
1074             D6 | 0000004F | LATIN CAPITAL LETTER O
1075             D7 | 00000050 | LATIN CAPITAL LETTER P
1076             D8 | 00000051 | LATIN CAPITAL LETTER Q
1077             D9 | 00000052 | LATIN CAPITAL LETTER R
1078             DA | 000000B9 | SUPERSCRIPT ONE
1079             DB | 000000FB | LATIN SMALL LETTER U WITH CIRCUMFLEX
1080             DC | 000000FC | LATIN SMALL LETTER U WITH DIAERESIS
1081             DD | 000000F9 | LATIN SMALL LETTER U WITH GRAVE
1082             DE | 000000FA | LATIN SMALL LETTER U WITH ACUTE
1083             DF | 000000FF | LATIN SMALL LETTER Y WITH DIAERESIS
1084             E0 | 0000005C | REVERSE SOLIDUS
1085             E1 | 000000F7 | DIVISION SIGN
1086             E2 | 00000053 | LATIN CAPITAL LETTER S
1087             E3 | 00000054 | LATIN CAPITAL LETTER T
1088             E4 | 00000055 | LATIN CAPITAL LETTER U
1089             E5 | 00000056 | LATIN CAPITAL LETTER V
1090             E6 | 00000057 | LATIN CAPITAL LETTER W
1091             E7 | 00000058 | LATIN CAPITAL LETTER X
1092             E8 | 00000059 | LATIN CAPITAL LETTER Y
1093             E9 | 0000005A | LATIN CAPITAL LETTER Z
1094             EA | 000000B2 | SUPERSCRIPT TWO
1095             EB | 000000D4 | LATIN CAPITAL LETTER O WITH CIRCUMFLEX
1096             EC | 000000D6 | LATIN CAPITAL LETTER O WITH DIAERESIS
1097             ED | 000000D2 | LATIN CAPITAL LETTER O WITH GRAVE
1098             EE | 000000D3 | LATIN CAPITAL LETTER O WITH ACUTE
1099             EF | 000000D5 | LATIN CAPITAL LETTER O WITH TILDE
1100             F0 | 00000030 | DIGIT ZERO
1101             F1 | 00000031 | DIGIT ONE
1102             F2 | 00000032 | DIGIT TWO
1103             F3 | 00000033 | DIGIT THREE
1104             F4 | 00000034 | DIGIT FOUR
1105             F5 | 00000035 | DIGIT FIVE
1106             F6 | 00000036 | DIGIT SIX
1107             F7 | 00000037 | DIGIT SEVEN
1108             F8 | 00000038 | DIGIT EIGHT
1109             F9 | 00000039 | DIGIT NINE
1110             FA | 000000B3 | SUPERSCRIPT THREE
1111             FB | 000000DB | LATIN CAPITAL LETTER U WITH CIRCUMFLEX
1112             FC | 000000DC | LATIN CAPITAL LETTER U WITH DIAERESIS
1113             FD | 000000D9 | LATIN CAPITAL LETTER U WITH GRAVE
1114             FE | 000000DA | LATIN CAPITAL LETTER U WITH ACUTE
1115             FF | 0000009F | APPLICATION PROGRAM COMMAND (APC)
1116              
1117              
1118             =head1 AUTHOR
1119              
1120             Copyright (C) 2002-2026 L<Guido Flohr|http://www.guido-flohr.net/>
1121             (L<mailto:guido.flohr@cantanea.com>), all rights reserved. See the source
1122             code for details!code for details!
1123              
1124             =head1 SEE ALSO
1125              
1126             Locale::RecodeData(3), Locale::Recode(3), perl(1)
1127              
1128             =cut
1129             Local Variables:
1130             mode: perl
1131             perl-indent-level: 4
1132             perl-continued-statement-offset: 4
1133             perl-continued-brace-offset: 0
1134             perl-brace-offset: -4
1135             perl-brace-imaginary-offset: 0
1136             perl-label-offset: -4
1137             cperl-indent-level: 4
1138             cperl-continued-statement-offset: 2
1139             tab-width: 4
1140             End: