File Coverage

blib/lib/Locale/RecodeData/GREEK7.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 GREEK7.
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::GREEK7;
22              
23 1     1   8 use strict;
  1         3  
  1         88  
24              
25             require Locale::RecodeData;
26 1     1   6 use base qw(Locale::RecodeData);
  1         1  
  1         462  
27              
28             my @to_ucs4 = (
29             0x0000,
30             0x0001,
31             0x0002,
32             0x0003,
33             0x0004,
34             0x0005,
35             0x0006,
36             0x0007,
37             0x0008,
38             0x0009,
39             0x000a,
40             0x000b,
41             0x000c,
42             0x000d,
43             0x000e,
44             0x000f,
45             0x0010,
46             0x0011,
47             0x0012,
48             0x0013,
49             0x0014,
50             0x0015,
51             0x0016,
52             0x0017,
53             0x0018,
54             0x0019,
55             0x001a,
56             0x001b,
57             0x001c,
58             0x001d,
59             0x001e,
60             0x001f,
61             0x0020,
62             0x0021,
63             0x0022,
64             0x0023,
65             0x00a4,
66             0x0025,
67             0x0026,
68             0x0027,
69             0x0028,
70             0x0029,
71             0x002a,
72             0x002b,
73             0x002c,
74             0x002d,
75             0x002e,
76             0x002f,
77             0x0030,
78             0x0031,
79             0x0032,
80             0x0033,
81             0x0034,
82             0x0035,
83             0x0036,
84             0x0037,
85             0x0038,
86             0x0039,
87             0x003a,
88             0x003b,
89             0x003c,
90             0x003d,
91             0x003e,
92             0x003f,
93             0x0040,
94             0x0391,
95             0x0392,
96             0x0393,
97             0x0394,
98             0x0395,
99             0x0396,
100             0x0397,
101             0x0398,
102             0x0399,
103             0xfffd,
104             0x039a,
105             0x039b,
106             0x039c,
107             0x039d,
108             0x039e,
109             0x039f,
110             0x03a0,
111             0x03a1,
112             0x03a3,
113             0x03a4,
114             0x03a5,
115             0x03a6,
116             0xfffd,
117             0x03a7,
118             0x03a8,
119             0x03a9,
120             0x005b,
121             0x005c,
122             0x005d,
123             0x005e,
124             0x005f,
125             0x0060,
126             0x03b1,
127             0x03b2,
128             0x03b3,
129             0x03b4,
130             0x03b5,
131             0x03b6,
132             0x03b7,
133             0x03b8,
134             0x03b9,
135             0xfffd,
136             0x03ba,
137             0x03bb,
138             0x03bc,
139             0x03bd,
140             0x03be,
141             0x03bf,
142             0x03c0,
143             0x03c1,
144             0x03c3,
145             0x03c4,
146             0x03c5,
147             0x03c6,
148             0x03c2,
149             0x03c7,
150             0x03c8,
151             0x03c9,
152             0x007b,
153             0x007c,
154             0x007d,
155             0x203e,
156             0x007f,
157             0xfffd,
158             0xfffd,
159             0xfffd,
160             0xfffd,
161             0xfffd,
162             0xfffd,
163             0xfffd,
164             0xfffd,
165             0xfffd,
166             0xfffd,
167             0xfffd,
168             0xfffd,
169             0xfffd,
170             0xfffd,
171             0xfffd,
172             0xfffd,
173             0xfffd,
174             0xfffd,
175             0xfffd,
176             0xfffd,
177             0xfffd,
178             0xfffd,
179             0xfffd,
180             0xfffd,
181             0xfffd,
182             0xfffd,
183             0xfffd,
184             0xfffd,
185             0xfffd,
186             0xfffd,
187             0xfffd,
188             0xfffd,
189             0xfffd,
190             0xfffd,
191             0xfffd,
192             0xfffd,
193             0xfffd,
194             0xfffd,
195             0xfffd,
196             0xfffd,
197             0xfffd,
198             0xfffd,
199             0xfffd,
200             0xfffd,
201             0xfffd,
202             0xfffd,
203             0xfffd,
204             0xfffd,
205             0xfffd,
206             0xfffd,
207             0xfffd,
208             0xfffd,
209             0xfffd,
210             0xfffd,
211             0xfffd,
212             0xfffd,
213             0xfffd,
214             0xfffd,
215             0xfffd,
216             0xfffd,
217             0xfffd,
218             0xfffd,
219             0xfffd,
220             0xfffd,
221             0xfffd,
222             0xfffd,
223             0xfffd,
224             0xfffd,
225             0xfffd,
226             0xfffd,
227             0xfffd,
228             0xfffd,
229             0xfffd,
230             0xfffd,
231             0xfffd,
232             0xfffd,
233             0xfffd,
234             0xfffd,
235             0xfffd,
236             0xfffd,
237             0xfffd,
238             0xfffd,
239             0xfffd,
240             0xfffd,
241             0xfffd,
242             0xfffd,
243             0xfffd,
244             0xfffd,
245             0xfffd,
246             0xfffd,
247             0xfffd,
248             0xfffd,
249             0xfffd,
250             0xfffd,
251             0xfffd,
252             0xfffd,
253             0xfffd,
254             0xfffd,
255             0xfffd,
256             0xfffd,
257             0xfffd,
258             0xfffd,
259             0xfffd,
260             0xfffd,
261             0xfffd,
262             0xfffd,
263             0xfffd,
264             0xfffd,
265             0xfffd,
266             0xfffd,
267             0xfffd,
268             0xfffd,
269             0xfffd,
270             0xfffd,
271             0xfffd,
272             0xfffd,
273             0xfffd,
274             0xfffd,
275             0xfffd,
276             0xfffd,
277             0xfffd,
278             0xfffd,
279             0xfffd,
280             0xfffd,
281             0xfffd,
282             0xfffd,
283             0xfffd,
284             0xfffd,
285             );
286              
287             my @to_utf8 = (
288             "\x00",
289             "\x01",
290             "\x02",
291             "\x03",
292             "\x04",
293             "\x05",
294             "\x06",
295             "\x07",
296             "\x08",
297             "\x09",
298             "\x0a",
299             "\x0b",
300             "\x0c",
301             "\x0d",
302             "\x0e",
303             "\x0f",
304             "\x10",
305             "\x11",
306             "\x12",
307             "\x13",
308             "\x14",
309             "\x15",
310             "\x16",
311             "\x17",
312             "\x18",
313             "\x19",
314             "\x1a",
315             "\x1b",
316             "\x1c",
317             "\x1d",
318             "\x1e",
319             "\x1f",
320             "\x20",
321             "\x21",
322             "\x22",
323             "\x23",
324             "\xc2\xa4",
325             "\x25",
326             "\x26",
327             "\x27",
328             "\x28",
329             "\x29",
330             "\x2a",
331             "\x2b",
332             "\x2c",
333             "\x2d",
334             "\x2e",
335             "\x2f",
336             "\x30",
337             "\x31",
338             "\x32",
339             "\x33",
340             "\x34",
341             "\x35",
342             "\x36",
343             "\x37",
344             "\x38",
345             "\x39",
346             "\x3a",
347             "\x3b",
348             "\x3c",
349             "\x3d",
350             "\x3e",
351             "\x3f",
352             "\x40",
353             "\xce\x91",
354             "\xce\x92",
355             "\xce\x93",
356             "\xce\x94",
357             "\xce\x95",
358             "\xce\x96",
359             "\xce\x97",
360             "\xce\x98",
361             "\xce\x99",
362             "\xef\xbf\xbd",
363             "\xce\x9a",
364             "\xce\x9b",
365             "\xce\x9c",
366             "\xce\x9d",
367             "\xce\x9e",
368             "\xce\x9f",
369             "\xce\xa0",
370             "\xce\xa1",
371             "\xce\xa3",
372             "\xce\xa4",
373             "\xce\xa5",
374             "\xce\xa6",
375             "\xef\xbf\xbd",
376             "\xce\xa7",
377             "\xce\xa8",
378             "\xce\xa9",
379             "\x5b",
380             "\x5c",
381             "\x5d",
382             "\x5e",
383             "\x5f",
384             "\x60",
385             "\xce\xb1",
386             "\xce\xb2",
387             "\xce\xb3",
388             "\xce\xb4",
389             "\xce\xb5",
390             "\xce\xb6",
391             "\xce\xb7",
392             "\xce\xb8",
393             "\xce\xb9",
394             "\xef\xbf\xbd",
395             "\xce\xba",
396             "\xce\xbb",
397             "\xce\xbc",
398             "\xce\xbd",
399             "\xce\xbe",
400             "\xce\xbf",
401             "\xcf\x80",
402             "\xcf\x81",
403             "\xcf\x83",
404             "\xcf\x84",
405             "\xcf\x85",
406             "\xcf\x86",
407             "\xcf\x82",
408             "\xcf\x87",
409             "\xcf\x88",
410             "\xcf\x89",
411             "\x7b",
412             "\x7c",
413             "\x7d",
414             "\xe2\x80\xbe",
415             "\x7f",
416             "\xef\xbf\xbd",
417             "\xef\xbf\xbd",
418             "\xef\xbf\xbd",
419             "\xef\xbf\xbd",
420             "\xef\xbf\xbd",
421             "\xef\xbf\xbd",
422             "\xef\xbf\xbd",
423             "\xef\xbf\xbd",
424             "\xef\xbf\xbd",
425             "\xef\xbf\xbd",
426             "\xef\xbf\xbd",
427             "\xef\xbf\xbd",
428             "\xef\xbf\xbd",
429             "\xef\xbf\xbd",
430             "\xef\xbf\xbd",
431             "\xef\xbf\xbd",
432             "\xef\xbf\xbd",
433             "\xef\xbf\xbd",
434             "\xef\xbf\xbd",
435             "\xef\xbf\xbd",
436             "\xef\xbf\xbd",
437             "\xef\xbf\xbd",
438             "\xef\xbf\xbd",
439             "\xef\xbf\xbd",
440             "\xef\xbf\xbd",
441             "\xef\xbf\xbd",
442             "\xef\xbf\xbd",
443             "\xef\xbf\xbd",
444             "\xef\xbf\xbd",
445             "\xef\xbf\xbd",
446             "\xef\xbf\xbd",
447             "\xef\xbf\xbd",
448             "\xef\xbf\xbd",
449             "\xef\xbf\xbd",
450             "\xef\xbf\xbd",
451             "\xef\xbf\xbd",
452             "\xef\xbf\xbd",
453             "\xef\xbf\xbd",
454             "\xef\xbf\xbd",
455             "\xef\xbf\xbd",
456             "\xef\xbf\xbd",
457             "\xef\xbf\xbd",
458             "\xef\xbf\xbd",
459             "\xef\xbf\xbd",
460             "\xef\xbf\xbd",
461             "\xef\xbf\xbd",
462             "\xef\xbf\xbd",
463             "\xef\xbf\xbd",
464             "\xef\xbf\xbd",
465             "\xef\xbf\xbd",
466             "\xef\xbf\xbd",
467             "\xef\xbf\xbd",
468             "\xef\xbf\xbd",
469             "\xef\xbf\xbd",
470             "\xef\xbf\xbd",
471             "\xef\xbf\xbd",
472             "\xef\xbf\xbd",
473             "\xef\xbf\xbd",
474             "\xef\xbf\xbd",
475             "\xef\xbf\xbd",
476             "\xef\xbf\xbd",
477             "\xef\xbf\xbd",
478             "\xef\xbf\xbd",
479             "\xef\xbf\xbd",
480             "\xef\xbf\xbd",
481             "\xef\xbf\xbd",
482             "\xef\xbf\xbd",
483             "\xef\xbf\xbd",
484             "\xef\xbf\xbd",
485             "\xef\xbf\xbd",
486             "\xef\xbf\xbd",
487             "\xef\xbf\xbd",
488             "\xef\xbf\xbd",
489             "\xef\xbf\xbd",
490             "\xef\xbf\xbd",
491             "\xef\xbf\xbd",
492             "\xef\xbf\xbd",
493             "\xef\xbf\xbd",
494             "\xef\xbf\xbd",
495             "\xef\xbf\xbd",
496             "\xef\xbf\xbd",
497             "\xef\xbf\xbd",
498             "\xef\xbf\xbd",
499             "\xef\xbf\xbd",
500             "\xef\xbf\xbd",
501             "\xef\xbf\xbd",
502             "\xef\xbf\xbd",
503             "\xef\xbf\xbd",
504             "\xef\xbf\xbd",
505             "\xef\xbf\xbd",
506             "\xef\xbf\xbd",
507             "\xef\xbf\xbd",
508             "\xef\xbf\xbd",
509             "\xef\xbf\xbd",
510             "\xef\xbf\xbd",
511             "\xef\xbf\xbd",
512             "\xef\xbf\xbd",
513             "\xef\xbf\xbd",
514             "\xef\xbf\xbd",
515             "\xef\xbf\xbd",
516             "\xef\xbf\xbd",
517             "\xef\xbf\xbd",
518             "\xef\xbf\xbd",
519             "\xef\xbf\xbd",
520             "\xef\xbf\xbd",
521             "\xef\xbf\xbd",
522             "\xef\xbf\xbd",
523             "\xef\xbf\xbd",
524             "\xef\xbf\xbd",
525             "\xef\xbf\xbd",
526             "\xef\xbf\xbd",
527             "\xef\xbf\xbd",
528             "\xef\xbf\xbd",
529             "\xef\xbf\xbd",
530             "\xef\xbf\xbd",
531             "\xef\xbf\xbd",
532             "\xef\xbf\xbd",
533             "\xef\xbf\xbd",
534             "\xef\xbf\xbd",
535             "\xef\xbf\xbd",
536             "\xef\xbf\xbd",
537             "\xef\xbf\xbd",
538             "\xef\xbf\xbd",
539             "\xef\xbf\xbd",
540             "\xef\xbf\xbd",
541             "\xef\xbf\xbd",
542             "\xef\xbf\xbd",
543             "\xef\xbf\xbd",
544             );
545              
546             my %from_ucs4 = (
547             0x00000000 => "\x00",
548             0x00000001 => "\x01",
549             0x00000002 => "\x02",
550             0x00000003 => "\x03",
551             0x00000004 => "\x04",
552             0x00000005 => "\x05",
553             0x00000006 => "\x06",
554             0x00000007 => "\x07",
555             0x00000008 => "\x08",
556             0x00000009 => "\x09",
557             0x0000000a => "\x0a",
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 => "\x14",
568             0x00000015 => "\x15",
569             0x00000016 => "\x16",
570             0x00000017 => "\x17",
571             0x00000018 => "\x18",
572             0x00000019 => "\x19",
573             0x0000001a => "\x1a",
574             0x0000001b => "\x1b",
575             0x0000001c => "\x1c",
576             0x0000001d => "\x1d",
577             0x0000001e => "\x1e",
578             0x0000001f => "\x1f",
579             0x00000020 => "\x20",
580             0x00000021 => "\x21",
581             0x00000022 => "\x22",
582             0x00000023 => "\x23",
583             0x00000025 => "\x25",
584             0x00000026 => "\x26",
585             0x00000027 => "\x27",
586             0x00000028 => "\x28",
587             0x00000029 => "\x29",
588             0x0000002a => "\x2a",
589             0x0000002b => "\x2b",
590             0x0000002c => "\x2c",
591             0x0000002d => "\x2d",
592             0x0000002e => "\x2e",
593             0x0000002f => "\x2f",
594             0x00000030 => "\x30",
595             0x00000031 => "\x31",
596             0x00000032 => "\x32",
597             0x00000033 => "\x33",
598             0x00000034 => "\x34",
599             0x00000035 => "\x35",
600             0x00000036 => "\x36",
601             0x00000037 => "\x37",
602             0x00000038 => "\x38",
603             0x00000039 => "\x39",
604             0x0000003a => "\x3a",
605             0x0000003b => "\x3b",
606             0x0000003c => "\x3c",
607             0x0000003d => "\x3d",
608             0x0000003e => "\x3e",
609             0x0000003f => "\x3f",
610             0x00000040 => "\x40",
611             0x0000005b => "\x5b",
612             0x0000005c => "\x5c",
613             0x0000005d => "\x5d",
614             0x0000005e => "\x5e",
615             0x0000005f => "\x5f",
616             0x00000060 => "\x60",
617             0x0000007b => "\x7b",
618             0x0000007c => "\x7c",
619             0x0000007d => "\x7d",
620             0x0000007f => "\x7f",
621             0x000000a4 => "\x24",
622             0x00000391 => "\x41",
623             0x00000392 => "\x42",
624             0x00000393 => "\x43",
625             0x00000394 => "\x44",
626             0x00000395 => "\x45",
627             0x00000396 => "\x46",
628             0x00000397 => "\x47",
629             0x00000398 => "\x48",
630             0x00000399 => "\x49",
631             0x0000039a => "\x4b",
632             0x0000039b => "\x4c",
633             0x0000039c => "\x4d",
634             0x0000039d => "\x4e",
635             0x0000039e => "\x4f",
636             0x0000039f => "\x50",
637             0x000003a0 => "\x51",
638             0x000003a1 => "\x52",
639             0x000003a3 => "\x53",
640             0x000003a4 => "\x54",
641             0x000003a5 => "\x55",
642             0x000003a6 => "\x56",
643             0x000003a7 => "\x58",
644             0x000003a8 => "\x59",
645             0x000003a9 => "\x5a",
646             0x000003b1 => "\x61",
647             0x000003b2 => "\x62",
648             0x000003b3 => "\x63",
649             0x000003b4 => "\x64",
650             0x000003b5 => "\x65",
651             0x000003b6 => "\x66",
652             0x000003b7 => "\x67",
653             0x000003b8 => "\x68",
654             0x000003b9 => "\x69",
655             0x000003ba => "\x6b",
656             0x000003bb => "\x6c",
657             0x000003bc => "\x6d",
658             0x000003bd => "\x6e",
659             0x000003be => "\x6f",
660             0x000003bf => "\x70",
661             0x000003c0 => "\x71",
662             0x000003c1 => "\x72",
663             0x000003c2 => "\x77",
664             0x000003c3 => "\x73",
665             0x000003c4 => "\x74",
666             0x000003c5 => "\x75",
667             0x000003c6 => "\x76",
668             0x000003c7 => "\x78",
669             0x000003c8 => "\x79",
670             0x000003c9 => "\x7a",
671             0x0000203e => "\x7e",
672             );
673              
674             sub _recode
675             {
676 633 100   633   894 if ($_[0]->{_from} eq 'INTERNAL') {
    100          
677             $_[1] = join '',
678             map $from_ucs4{$_}
679             || (defined $from_ucs4{$_} ? $from_ucs4{$_} : "\x3f"),
680 127   100     119 @{$_[1]};
  127         312  
681             } elsif ($_[0]->{_to} eq 'UTF-8',) {
682 253         456 $_[1] = join '', map $to_utf8[$_], unpack 'C*', $_[1];
683             } else {
684 253         362 $_[1] = [ map
685             $to_ucs4[$_],
686             unpack 'C*', $_[1]
687             ];
688             }
689              
690 633         766 return 1;
691             }
692              
693             1;
694              
695             __END__
696              
697             =head1 NAME
698              
699             Locale::RecodeData::GREEK7 - Conversion routines for GREEK7
700              
701             =head1 SYNOPSIS
702              
703             This module is internal to libintl. Do not use directly!
704              
705             =head1 DESCRIPTION
706              
707             This module is generated and contains the conversion tables and
708             routines for GREEK7.
709              
710             =head1 COMMENTS
711              
712             The following comments have been extracted from the original charmap:
713              
714             version: 1.0
715             repertoiremap: mnemonic,ds
716             source: ECMA registry
717             alias ISO-IR-88
718              
719             Please note that aliases listed above are not necessarily valid!
720              
721             =head1 CHARACTER TABLE
722              
723             The following table is sorted in the same order as the original charmap.
724             All character codes are in hexadecimal. Please read 'ISO-10646' as
725             'ISO-10646-UCS4'.
726              
727             Local | ISO-10646 | Description
728             -------+-----------+-------------------------------------------------
729             00 | 00000000 | NULL (NUL)
730             01 | 00000001 | START OF HEADING (SOH)
731             02 | 00000002 | START OF TEXT (STX)
732             03 | 00000003 | END OF TEXT (ETX)
733             04 | 00000004 | END OF TRANSMISSION (EOT)
734             05 | 00000005 | ENQUIRY (ENQ)
735             06 | 00000006 | ACKNOWLEDGE (ACK)
736             07 | 00000007 | BELL (BEL)
737             08 | 00000008 | BACKSPACE (BS)
738             09 | 00000009 | CHARACTER TABULATION (HT)
739             0A | 0000000A | LINE FEED (LF)
740             0B | 0000000B | LINE TABULATION (VT)
741             0C | 0000000C | FORM FEED (FF)
742             0D | 0000000D | CARRIAGE RETURN (CR)
743             0E | 0000000E | SHIFT OUT (SO)
744             0F | 0000000F | SHIFT IN (SI)
745             10 | 00000010 | DATALINK ESCAPE (DLE)
746             11 | 00000011 | DEVICE CONTROL ONE (DC1)
747             12 | 00000012 | DEVICE CONTROL TWO (DC2)
748             13 | 00000013 | DEVICE CONTROL THREE (DC3)
749             14 | 00000014 | DEVICE CONTROL FOUR (DC4)
750             15 | 00000015 | NEGATIVE ACKNOWLEDGE (NAK)
751             16 | 00000016 | SYNCHRONOUS IDLE (SYN)
752             17 | 00000017 | END OF TRANSMISSION BLOCK (ETB)
753             18 | 00000018 | CANCEL (CAN)
754             19 | 00000019 | END OF MEDIUM (EM)
755             1A | 0000001A | SUBSTITUTE (SUB)
756             1B | 0000001B | ESCAPE (ESC)
757             1C | 0000001C | FILE SEPARATOR (IS4)
758             1D | 0000001D | GROUP SEPARATOR (IS3)
759             1E | 0000001E | RECORD SEPARATOR (IS2)
760             1F | 0000001F | UNIT SEPARATOR (IS1)
761             20 | 00000020 | SPACE
762             21 | 00000021 | EXCLAMATION MARK
763             22 | 00000022 | QUOTATION MARK
764             23 | 00000023 | NUMBER SIGN
765             24 | 000000A4 | CURRENCY SIGN
766             25 | 00000025 | PERCENT SIGN
767             26 | 00000026 | AMPERSAND
768             27 | 00000027 | APOSTROPHE
769             28 | 00000028 | LEFT PARENTHESIS
770             29 | 00000029 | RIGHT PARENTHESIS
771             2A | 0000002A | ASTERISK
772             2B | 0000002B | PLUS SIGN
773             2C | 0000002C | COMMA
774             2D | 0000002D | HYPHEN-MINUS
775             2E | 0000002E | FULL STOP
776             2F | 0000002F | SOLIDUS
777             30 | 00000030 | DIGIT ZERO
778             31 | 00000031 | DIGIT ONE
779             32 | 00000032 | DIGIT TWO
780             33 | 00000033 | DIGIT THREE
781             34 | 00000034 | DIGIT FOUR
782             35 | 00000035 | DIGIT FIVE
783             36 | 00000036 | DIGIT SIX
784             37 | 00000037 | DIGIT SEVEN
785             38 | 00000038 | DIGIT EIGHT
786             39 | 00000039 | DIGIT NINE
787             3A | 0000003A | COLON
788             3B | 0000003B | SEMICOLON
789             3C | 0000003C | LESS-THAN SIGN
790             3D | 0000003D | EQUALS SIGN
791             3E | 0000003E | GREATER-THAN SIGN
792             3F | 0000003F | QUESTION MARK
793             40 | 00000040 | COMMERCIAL AT
794             41 | 00000391 | GREEK CAPITAL LETTER ALPHA
795             42 | 00000392 | GREEK CAPITAL LETTER BETA
796             43 | 00000393 | GREEK CAPITAL LETTER GAMMA
797             44 | 00000394 | GREEK CAPITAL LETTER DELTA
798             45 | 00000395 | GREEK CAPITAL LETTER EPSILON
799             46 | 00000396 | GREEK CAPITAL LETTER ZETA
800             47 | 00000397 | GREEK CAPITAL LETTER ETA
801             48 | 00000398 | GREEK CAPITAL LETTER THETA
802             49 | 00000399 | GREEK CAPITAL LETTER IOTA
803             4B | 0000039A | GREEK CAPITAL LETTER KAPPA
804             4C | 0000039B | GREEK CAPITAL LETTER LAMDA
805             4D | 0000039C | GREEK CAPITAL LETTER MU
806             4E | 0000039D | GREEK CAPITAL LETTER NU
807             4F | 0000039E | GREEK CAPITAL LETTER XI
808             50 | 0000039F | GREEK CAPITAL LETTER OMICRON
809             51 | 000003A0 | GREEK CAPITAL LETTER PI
810             52 | 000003A1 | GREEK CAPITAL LETTER RHO
811             53 | 000003A3 | GREEK CAPITAL LETTER SIGMA
812             54 | 000003A4 | GREEK CAPITAL LETTER TAU
813             55 | 000003A5 | GREEK CAPITAL LETTER UPSILON
814             56 | 000003A6 | GREEK CAPITAL LETTER PHI
815             58 | 000003A7 | GREEK CAPITAL LETTER CHI
816             59 | 000003A8 | GREEK CAPITAL LETTER PSI
817             5A | 000003A9 | GREEK CAPITAL LETTER OMEGA
818             5B | 0000005B | LEFT SQUARE BRACKET
819             5C | 0000005C | REVERSE SOLIDUS
820             5D | 0000005D | RIGHT SQUARE BRACKET
821             5E | 0000005E | CIRCUMFLEX ACCENT
822             5F | 0000005F | LOW LINE
823             60 | 00000060 | GRAVE ACCENT
824             61 | 000003B1 | GREEK SMALL LETTER ALPHA
825             62 | 000003B2 | GREEK SMALL LETTER BETA
826             63 | 000003B3 | GREEK SMALL LETTER GAMMA
827             64 | 000003B4 | GREEK SMALL LETTER DELTA
828             65 | 000003B5 | GREEK SMALL LETTER EPSILON
829             66 | 000003B6 | GREEK SMALL LETTER ZETA
830             67 | 000003B7 | GREEK SMALL LETTER ETA
831             68 | 000003B8 | GREEK SMALL LETTER THETA
832             69 | 000003B9 | GREEK SMALL LETTER IOTA
833             6B | 000003BA | GREEK SMALL LETTER KAPPA
834             6C | 000003BB | GREEK SMALL LETTER LAMDA
835             6D | 000003BC | GREEK SMALL LETTER MU
836             6E | 000003BD | GREEK SMALL LETTER NU
837             6F | 000003BE | GREEK SMALL LETTER XI
838             70 | 000003BF | GREEK SMALL LETTER OMICRON
839             71 | 000003C0 | GREEK SMALL LETTER PI
840             72 | 000003C1 | GREEK SMALL LETTER RHO
841             73 | 000003C3 | GREEK SMALL LETTER SIGMA
842             74 | 000003C4 | GREEK SMALL LETTER TAU
843             75 | 000003C5 | GREEK SMALL LETTER UPSILON
844             76 | 000003C6 | GREEK SMALL LETTER PHI
845             77 | 000003C2 | GREEK SMALL LETTER FINAL SIGMA
846             78 | 000003C7 | GREEK SMALL LETTER CHI
847             79 | 000003C8 | GREEK SMALL LETTER PSI
848             7A | 000003C9 | GREEK SMALL LETTER OMEGA
849             7B | 0000007B | LEFT CURLY BRACKET
850             7C | 0000007C | VERTICAL LINE
851             7D | 0000007D | RIGHT CURLY BRACKET
852             7E | 0000203E | OVERLINE
853             7F | 0000007F | DELETE (DEL)
854              
855              
856             =head1 AUTHOR
857              
858             Copyright (C) 2002-2026 L<Guido Flohr|http://www.guido-flohr.net/>
859             (L<mailto:guido.flohr@cantanea.com>), all rights reserved. See the source
860             code for details!code for details!
861              
862             =head1 SEE ALSO
863              
864             Locale::RecodeData(3), Locale::Recode(3), perl(1)
865              
866             =cut
867             Local Variables:
868             mode: perl
869             perl-indent-level: 4
870             perl-continued-statement-offset: 4
871             perl-continued-brace-offset: 0
872             perl-brace-offset: -4
873             perl-brace-imaginary-offset: 0
874             perl-label-offset: -4
875             cperl-indent-level: 4
876             cperl-continued-statement-offset: 2
877             tab-width: 4
878             End: