FM / RecodeData

/usr/share/perl5/Locale/RecodeData

Name	Size	Mode	Actions
ASMO_449.pm	17909	0644	edit dl rm
ATARI_ST.pm	26931	0644	edit dl rm
ATARI_ST_EURO.pm	26975	0644	edit dl rm
CP1250.pm	27176	0644	edit dl rm
CP1251.pm	27118	0644	edit dl rm
CP1252.pm	26991	0644	edit dl rm
CP1253.pm	25886	0644	edit dl rm
CP1254.pm	26828	0644	edit dl rm
CP1256.pm	26511	0644	edit dl rm
CP1257.pm	26473	0644	edit dl rm
CP10007.pm	26800	0644	edit dl rm
CSN_369103.pm	27652	0644	edit dl rm
CWI.pm	27807	0644	edit dl rm
DEC_MCS.pm	26408	0644	edit dl rm
EBCDIC_AT_DE.pm	20656	0644	edit dl rm
EBCDIC_AT_DE_A.pm	20394	0644	edit dl rm
EBCDIC_CA_FR.pm	22231	0644	edit dl rm
EBCDIC_DK_NO.pm	20657	0644	edit dl rm
EBCDIC_DK_NO_A.pm	20337	0644	edit dl rm
EBCDIC_ES.pm	20514	0644	edit dl rm
EBCDIC_ES_A.pm	20247	0644	edit dl rm
EBCDIC_ES_S.pm	20516	0644	edit dl rm
EBCDIC_FI_SE.pm	20713	0644	edit dl rm
EBCDIC_FI_SE_A.pm	20371	0644	edit dl rm
EBCDIC_FR.pm	20570	0644	edit dl rm
EBCDIC_IS_FRISS.pm	19672	0644	edit dl rm
EBCDIC_IT.pm	20615	0644	edit dl rm
EBCDIC_PT.pm	20377	0644	edit dl rm
EBCDIC_UK.pm	20463	0644	edit dl rm
EBCDIC_US.pm	20451	0644	edit dl rm
ECMA_CYRILLIC.pm	27304	0644	edit dl rm
GEORGIAN_ACADEMY.pm	26721	0644	edit dl rm
GEORGIAN_PS.pm	26695	0644	edit dl rm
GOST_19768_74.pm	25203	0644	edit dl rm
GREEK7.pm	18427	0644	edit dl rm
GREEK7_OLD.pm	18581	0644	edit dl rm
GREEK_CCITT.pm	18395	0644	edit dl rm
HP_ROMAN8.pm	27489	0644	edit dl rm
IBM037.pm	27409	0644	edit dl rm
IBM038.pm	20485	0644	edit dl rm
IBM256.pm	27348	0644	edit dl rm
IBM273.pm	27335	0644	edit dl rm
IBM274.pm	20590	0644	edit dl rm
IBM275.pm	20638	0644	edit dl rm
IBM277.pm	27362	0644	edit dl rm
IBM278.pm	27375	0644	edit dl rm
IBM280.pm	27355	0644	edit dl rm
IBM281.pm	20477	0644	edit dl rm
IBM284.pm	27355	0644	edit dl rm
IBM285.pm	27355	0644	edit dl rm
IBM290.pm	23069	0644	edit dl rm
IBM297.pm	27355	0644	edit dl rm
IBM420.pm	26706	0644	edit dl rm
IBM423.pm	26764	0644	edit dl rm
IBM424.pm	23964	0644	edit dl rm
IBM437.pm	27791	0644	edit dl rm
IBM500.pm	27393	0644	edit dl rm
IBM850.pm	27582	0644	edit dl rm
IBM851.pm	27529	0644	edit dl rm
IBM852.pm	27871	0644	edit dl rm
IBM855.pm	27524	0644	edit dl rm
IBM857.pm	27340	0644	edit dl rm
IBM860.pm	27832	0644	edit dl rm
IBM861.pm	27877	0644	edit dl rm
IBM862.pm	27390	0644	edit dl rm
IBM863.pm	27710	0644	edit dl rm
IBM864.pm	27303	0644	edit dl rm
IBM865.pm	27817	0644	edit dl rm
IBM866.pm	27485	0644	edit dl rm
IBM868.pm	25615	0644	edit dl rm
IBM869.pm	26799	0644	edit dl rm
IBM870.pm	26751	0644	edit dl rm
IBM871.pm	27349	0644	edit dl rm
IBM874.pm	24751	0644	edit dl rm
IBM875.pm	26681	0644	edit dl rm
IBM880.pm	26652	0644	edit dl rm
IBM891.pm	18233	0644	edit dl rm
IBM903.pm	18233	0644	edit dl rm
IBM904.pm	18403	0644	edit dl rm
IBM905.pm	26961	0644	edit dl rm
IBM918.pm	25238	0644	edit dl rm
IBM1004.pm	26716	0644	edit dl rm
IBM1026.pm	27340	0644	edit dl rm
IBM1047.pm	27384	0644	edit dl rm
IEC_P27_1.pm	26593	0644	edit dl rm
INIS.pm	17510	0644	edit dl rm
INIS_8.pm	15341	0644	edit dl rm
INIS_CYRILLIC.pm	18557	0644	edit dl rm
ISO_2033_1983.pm	13715	0644	edit dl rm
ISO_5427.pm	18855	0644	edit dl rm
ISO_5427_EXT.pm	15955	0644	edit dl rm
ISO_5428.pm	18360	0644	edit dl rm
ISO_8859_1.pm	17247	0644	edit dl rm
ISO_8859_2.pm	27689	0644	edit dl rm
ISO_8859_3.pm	27134	0644	edit dl rm
ISO_8859_4.pm	27689	0644	edit dl rm
ISO_8859_5.pm	27345	0644	edit dl rm
ISO_8859_6.pm	23721	0644	edit dl rm
ISO_8859_7.pm	26845	0644	edit dl rm
ISO_8859_8.pm	24174	0644	edit dl rm
ISO_8859_9.pm	27381	0644	edit dl rm
ISO_8859_10.pm	27841	0644	edit dl rm
ISO_8859_11.pm	24510	0644	edit dl rm
ISO_8859_13.pm	27275	0644	edit dl rm
ISO_8859_14.pm	27719	0644	edit dl rm
ISO_8859_15.pm	27171	0644	edit dl rm
ISO_8859_16.pm	27568	0644	edit dl rm
ISO_10367_BOX.pm	22725	0644	edit dl rm
KOI8_R.pm	27680	0644	edit dl rm
KOI8_RU.pm	27530	0644	edit dl rm
KOI8_T.pm	25668	0644	edit dl rm
KOI8_U.pm	27555	0644	edit dl rm
KOI_8.pm	22608	0644	edit dl rm
LATIN_GREEK.pm	18399	0644	edit dl rm
LATIN_GREEK_1.pm	18415	0644	edit dl rm
MACARABIC.pm	25129	0644	edit dl rm
MACCROATIAN.pm	27197	0644	edit dl rm
MACCYRILLIC.pm	27007	0644	edit dl rm
MACGREEK.pm	27168	0644	edit dl rm
MACHEBREW.pm	24250	0644	edit dl rm
MACICELAND.pm	27048	0644	edit dl rm
MACINTOSH.pm	27238	0644	edit dl rm
MACROMANIA.pm	27096	0644	edit dl rm
MACTHAI.pm	26525	0644	edit dl rm
MACTURKISH.pm	27009	0644	edit dl rm
MACUKRAINE.pm	27045	0644	edit dl rm
MAC_IS.pm	27012	0644	edit dl rm
MAC_SAMI.pm	27443	0644	edit dl rm
MAC_UK.pm	26803	0644	edit dl rm
NATS_DANO.pm	18472	0644	edit dl rm
NATS_SEFI.pm	18440	0644	edit dl rm
NEXTSTEP.pm	27076	0644	edit dl rm
SAMI_WS2.pm	27416	0644	edit dl rm
TIS_620.pm	24414	0644	edit dl rm
US_ASCII.pm	7522	0644	edit dl rm
UTF_8.pm	5082	0644	edit dl rm
VISCII.pm	29163	0644	edit dl rm
_Encode.pm	2298	0644	edit dl rm

Edit: /usr/share/perl5/Locale/RecodeData/MACGREEK.pm (27168B)

#! /bin/false
# vim: set autoindent shiftwidth=4 tabstop=4:

# Conversion routines for MACGREEK.
# Copyright (C) 2002-2016 Guido Flohr <guido.flohr@cantanea.com>,
# all rights reserved.

# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 3 of the License, or
# (at your option) any later version.

# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.

# You should have received a copy of the GNU General Public License
# along with this program.  If not, see <http://www.gnu.org/licenses/>.

package Locale::RecodeData::MACGREEK;

use strict;

require Locale::RecodeData;
use base qw(Locale::RecodeData);

my @to_ucs4 = (
    0x0000,
    0x0001,
    0x0002,
    0x0003,
    0x0004,
    0x0005,
    0x0006,
    0x0007,
    0x0008,
    0x0009,
    0x000a,
    0x000b,
    0x000c,
    0x000d,
    0x000e,
    0x000f,
    0x0010,
    0x0011,
    0x0012,
    0x0013,
    0x0014,
    0x0015,
    0x0016,
    0x0017,
    0x0018,
    0x0019,
    0x001a,
    0x001b,
    0x001c,
    0x001d,
    0x001e,
    0x001f,
    0x0020,
    0x0021,
    0x0022,
    0x0023,
    0x0024,
    0x0025,
    0x0026,
    0x0027,
    0x0028,
    0x0029,
    0x002a,
    0x002b,
    0x002c,
    0x002d,
    0x002e,
    0x002f,
    0x0030,
    0x0031,
    0x0032,
    0x0033,
    0x0034,
    0x0035,
    0x0036,
    0x0037,
    0x0038,
    0x0039,
    0x003a,
    0x003b,
    0x003c,
    0x003d,
    0x003e,
    0x003f,
    0x0040,
    0x0041,
    0x0042,
    0x0043,
    0x0044,
    0x0045,
    0x0046,
    0x0047,
    0x0048,
    0x0049,
    0x004a,
    0x004b,
    0x004c,
    0x004d,
    0x004e,
    0x004f,
    0x0050,
    0x0051,
    0x0052,
    0x0053,
    0x0054,
    0x0055,
    0x0056,
    0x0057,
    0x0058,
    0x0059,
    0x005a,
    0x005b,
    0x005c,
    0x005d,
    0x005e,
    0x005f,
    0x0060,
    0x0061,
    0x0062,
    0x0063,
    0x0064,
    0x0065,
    0x0066,
    0x0067,
    0x0068,
    0x0069,
    0x006a,
    0x006b,
    0x006c,
    0x006d,
    0x006e,
    0x006f,
    0x0070,
    0x0071,
    0x0072,
    0x0073,
    0x0074,
    0x0075,
    0x0076,
    0x0077,
    0x0078,
    0x0079,
    0x007a,
    0x007b,
    0x007c,
    0x007d,
    0x007e,
    0x007f,
    0x00c4,
    0x00b9,
    0x00b2,
    0x00c9,
    0x00b3,
    0x00d6,
    0x00dc,
    0x0385,
    0x00e0,
    0x00e2,
    0x00e4,
    0x0384,
    0x00a8,
    0x00e7,
    0x00e9,
    0x00e8,
    0x00ea,
    0x00eb,
    0x00a3,
    0x2122,
    0x00ee,
    0x00ef,
    0x2022,
    0x00bd,
    0x2030,
    0x00f4,
    0x00f6,
    0x00a6,
    0x00ad,
    0x00f9,
    0x00fb,
    0x00fc,
    0x2020,
    0x0393,
    0x0394,
    0x0398,
    0x039b,
    0x039e,
    0x03a0,
    0x00df,
    0x00ae,
    0x00a9,
    0x03a3,
    0x03aa,
    0x00a7,
    0x2260,
    0x00b0,
    0x0387,
    0x0391,
    0x00b1,
    0x2264,
    0x2265,
    0x00a5,
    0x0392,
    0x0395,
    0x0396,
    0x0397,
    0x0399,
    0x039a,
    0x039c,
    0x03a6,
    0x03ab,
    0x03a8,
    0x03a9,
    0x03ac,
    0x039d,
    0x00ac,
    0x039f,
    0x03a1,
    0x2248,
    0x03a4,
    0x00ab,
    0x00bb,
    0x2026,
    0x00a0,
    0x03a5,
    0x03a7,
    0x0386,
    0x0388,
    0x0153,
    0x2013,
    0x2015,
    0x201c,
    0x201d,
    0x2018,
    0x2019,
    0x00f7,
    0x0389,
    0x038a,
    0x038c,
    0x038e,
    0x03ad,
    0x03ae,
    0x03af,
    0x03cc,
    0x038f,
    0x03cd,
    0x03b1,
    0x03b2,
    0x03c8,
    0x03b4,
    0x03b5,
    0x03c6,
    0x03b3,
    0x03b7,
    0x03b9,
    0x03be,
    0x03ba,
    0x03bb,
    0x03bc,
    0x03bd,
    0x03bf,
    0x03c0,
    0x03ce,
    0x03c1,
    0x03c3,
    0x03c4,
    0x03b8,
    0x03c9,
    0x03c2,
    0x03c7,
    0x03c5,
    0x03b6,
    0x03ca,
    0x03cb,
    0x0390,
    0x03b0,
    0xfffd,
);

my @to_utf8 = (
    "\x00",
    "\x01",
    "\x02",
    "\x03",
    "\x04",
    "\x05",
    "\x06",
    "\x07",
    "\x08",
    "\x09",
    "\x0a",
    "\x0b",
    "\x0c",
    "\x0d",
    "\x0e",
    "\x0f",
    "\x10",
    "\x11",
    "\x12",
    "\x13",
    "\x14",
    "\x15",
    "\x16",
    "\x17",
    "\x18",
    "\x19",
    "\x1a",
    "\x1b",
    "\x1c",
    "\x1d",
    "\x1e",
    "\x1f",
    "\x20",
    "\x21",
    "\x22",
    "\x23",
    "\x24",
    "\x25",
    "\x26",
    "\x27",
    "\x28",
    "\x29",
    "\x2a",
    "\x2b",
    "\x2c",
    "\x2d",
    "\x2e",
    "\x2f",
    "\x30",
    "\x31",
    "\x32",
    "\x33",
    "\x34",
    "\x35",
    "\x36",
    "\x37",
    "\x38",
    "\x39",
    "\x3a",
    "\x3b",
    "\x3c",
    "\x3d",
    "\x3e",
    "\x3f",
    "\x40",
    "\x41",
    "\x42",
    "\x43",
    "\x44",
    "\x45",
    "\x46",
    "\x47",
    "\x48",
    "\x49",
    "\x4a",
    "\x4b",
    "\x4c",
    "\x4d",
    "\x4e",
    "\x4f",
    "\x50",
    "\x51",
    "\x52",
    "\x53",
    "\x54",
    "\x55",
    "\x56",
    "\x57",
    "\x58",
    "\x59",
    "\x5a",
    "\x5b",
    "\x5c",
    "\x5d",
    "\x5e",
    "\x5f",
    "\x60",
    "\x61",
    "\x62",
    "\x63",
    "\x64",
    "\x65",
    "\x66",
    "\x67",
    "\x68",
    "\x69",
    "\x6a",
    "\x6b",
    "\x6c",
    "\x6d",
    "\x6e",
    "\x6f",
    "\x70",
    "\x71",
    "\x72",
    "\x73",
    "\x74",
    "\x75",
    "\x76",
    "\x77",
    "\x78",
    "\x79",
    "\x7a",
    "\x7b",
    "\x7c",
    "\x7d",
    "\x7e",
    "\x7f",
    "\xc3\x84",
    "\xc2\xb9",
    "\xc2\xb2",
    "\xc3\x89",
    "\xc2\xb3",
    "\xc3\x96",
    "\xc3\x9c",
    "\xce\x85",
    "\xc3\xa0",
    "\xc3\xa2",
    "\xc3\xa4",
    "\xce\x84",
    "\xc2\xa8",
    "\xc3\xa7",
    "\xc3\xa9",
    "\xc3\xa8",
    "\xc3\xaa",
    "\xc3\xab",
    "\xc2\xa3",
    "\xe2\x84\xa2",
    "\xc3\xae",
    "\xc3\xaf",
    "\xe2\x80\xa2",
    "\xc2\xbd",
    "\xe2\x80\xb0",
    "\xc3\xb4",
    "\xc3\xb6",
    "\xc2\xa6",
    "\xc2\xad",
    "\xc3\xb9",
    "\xc3\xbb",
    "\xc3\xbc",
    "\xe2\x80\xa0",
    "\xce\x93",
    "\xce\x94",
    "\xce\x98",
    "\xce\x9b",
    "\xce\x9e",
    "\xce\xa0",
    "\xc3\x9f",
    "\xc2\xae",
    "\xc2\xa9",
    "\xce\xa3",
    "\xce\xaa",
    "\xc2\xa7",
    "\xe2\x89\xa0",
    "\xc2\xb0",
    "\xce\x87",
    "\xce\x91",
    "\xc2\xb1",
    "\xe2\x89\xa4",
    "\xe2\x89\xa5",
    "\xc2\xa5",
    "\xce\x92",
    "\xce\x95",
    "\xce\x96",
    "\xce\x97",
    "\xce\x99",
    "\xce\x9a",
    "\xce\x9c",
    "\xce\xa6",
    "\xce\xab",
    "\xce\xa8",
    "\xce\xa9",
    "\xce\xac",
    "\xce\x9d",
    "\xc2\xac",
    "\xce\x9f",
    "\xce\xa1",
    "\xe2\x89\x88",
    "\xce\xa4",
    "\xc2\xab",
    "\xc2\xbb",
    "\xe2\x80\xa6",
    "\xc2\xa0",
    "\xce\xa5",
    "\xce\xa7",
    "\xce\x86",
    "\xce\x88",
    "\xc5\x93",
    "\xe2\x80\x93",
    "\xe2\x80\x95",
    "\xe2\x80\x9c",
    "\xe2\x80\x9d",
    "\xe2\x80\x98",
    "\xe2\x80\x99",
    "\xc3\xb7",
    "\xce\x89",
    "\xce\x8a",
    "\xce\x8c",
    "\xce\x8e",
    "\xce\xad",
    "\xce\xae",
    "\xce\xaf",
    "\xcf\x8c",
    "\xce\x8f",
    "\xcf\x8d",
    "\xce\xb1",
    "\xce\xb2",
    "\xcf\x88",
    "\xce\xb4",
    "\xce\xb5",
    "\xcf\x86",
    "\xce\xb3",
    "\xce\xb7",
    "\xce\xb9",
    "\xce\xbe",
    "\xce\xba",
    "\xce\xbb",
    "\xce\xbc",
    "\xce\xbd",
    "\xce\xbf",
    "\xcf\x80",
    "\xcf\x8e",
    "\xcf\x81",
    "\xcf\x83",
    "\xcf\x84",
    "\xce\xb8",
    "\xcf\x89",
    "\xcf\x82",
    "\xcf\x87",
    "\xcf\x85",
    "\xce\xb6",
    "\xcf\x8a",
    "\xcf\x8b",
    "\xce\x90",
    "\xce\xb0",
    "\xef\xbf\xbd",
);

my %from_ucs4 = (
    0x00000000 => "\x00",
    0x00000001 => "\x01",
    0x00000002 => "\x02",
    0x00000003 => "\x03",
    0x00000004 => "\x04",
    0x00000005 => "\x05",
    0x00000006 => "\x06",
    0x00000007 => "\x07",
    0x00000008 => "\x08",
    0x00000009 => "\x09",
    0x0000000a => "\x0a",
    0x0000000b => "\x0b",
    0x0000000c => "\x0c",
    0x0000000d => "\x0d",
    0x0000000e => "\x0e",
    0x0000000f => "\x0f",
    0x00000010 => "\x10",
    0x00000011 => "\x11",
    0x00000012 => "\x12",
    0x00000013 => "\x13",
    0x00000014 => "\x14",
    0x00000015 => "\x15",
    0x00000016 => "\x16",
    0x00000017 => "\x17",
    0x00000018 => "\x18",
    0x00000019 => "\x19",
    0x0000001a => "\x1a",
    0x0000001b => "\x1b",
    0x0000001c => "\x1c",
    0x0000001d => "\x1d",
    0x0000001e => "\x1e",
    0x0000001f => "\x1f",
    0x00000020 => "\x20",
    0x00000021 => "\x21",
    0x00000022 => "\x22",
    0x00000023 => "\x23",
    0x00000024 => "\x24",
    0x00000025 => "\x25",
    0x00000026 => "\x26",
    0x00000027 => "\x27",
    0x00000028 => "\x28",
    0x00000029 => "\x29",
    0x0000002a => "\x2a",
    0x0000002b => "\x2b",
    0x0000002c => "\x2c",
    0x0000002d => "\x2d",
    0x0000002e => "\x2e",
    0x0000002f => "\x2f",
    0x00000030 => "\x30",
    0x00000031 => "\x31",
    0x00000032 => "\x32",
    0x00000033 => "\x33",
    0x00000034 => "\x34",
    0x00000035 => "\x35",
    0x00000036 => "\x36",
    0x00000037 => "\x37",
    0x00000038 => "\x38",
    0x00000039 => "\x39",
    0x0000003a => "\x3a",
    0x0000003b => "\x3b",
    0x0000003c => "\x3c",
    0x0000003d => "\x3d",
    0x0000003e => "\x3e",
    0x0000003f => "\x3f",
    0x00000040 => "\x40",
    0x00000041 => "\x41",
    0x00000042 => "\x42",
    0x00000043 => "\x43",
    0x00000044 => "\x44",
    0x00000045 => "\x45",
    0x00000046 => "\x46",
    0x00000047 => "\x47",
    0x00000048 => "\x48",
    0x00000049 => "\x49",
    0x0000004a => "\x4a",
    0x0000004b => "\x4b",
    0x0000004c => "\x4c",
    0x0000004d => "\x4d",
    0x0000004e => "\x4e",
    0x0000004f => "\x4f",
    0x00000050 => "\x50",
    0x00000051 => "\x51",
    0x00000052 => "\x52",
    0x00000053 => "\x53",
    0x00000054 => "\x54",
    0x00000055 => "\x55",
    0x00000056 => "\x56",
    0x00000057 => "\x57",
    0x00000058 => "\x58",
    0x00000059 => "\x59",
    0x0000005a => "\x5a",
    0x0000005b => "\x5b",
    0x0000005c => "\x5c",
    0x0000005d => "\x5d",
    0x0000005e => "\x5e",
    0x0000005f => "\x5f",
    0x00000060 => "\x60",
    0x00000061 => "\x61",
    0x00000062 => "\x62",
    0x00000063 => "\x63",
    0x00000064 => "\x64",
    0x00000065 => "\x65",
    0x00000066 => "\x66",
    0x00000067 => "\x67",
    0x00000068 => "\x68",
    0x00000069 => "\x69",
    0x0000006a => "\x6a",
    0x0000006b => "\x6b",
    0x0000006c => "\x6c",
    0x0000006d => "\x6d",
    0x0000006e => "\x6e",
    0x0000006f => "\x6f",
    0x00000070 => "\x70",
    0x00000071 => "\x71",
    0x00000072 => "\x72",
    0x00000073 => "\x73",
    0x00000074 => "\x74",
    0x00000075 => "\x75",
    0x00000076 => "\x76",
    0x00000077 => "\x77",
    0x00000078 => "\x78",
    0x00000079 => "\x79",
    0x0000007a => "\x7a",
    0x0000007b => "\x7b",
    0x0000007c => "\x7c",
    0x0000007d => "\x7d",
    0x0000007e => "\x7e",
    0x0000007f => "\x7f",
    0x000000a0 => "\xca",
    0x000000a3 => "\x92",
    0x000000a5 => "\xb4",
    0x000000a6 => "\x9b",
    0x000000a7 => "\xac",
    0x000000a8 => "\x8c",
    0x000000a9 => "\xa9",
    0x000000ab => "\xc7",
    0x000000ac => "\xc2",
    0x000000ad => "\x9c",
    0x000000ae => "\xa8",
    0x000000b0 => "\xae",
    0x000000b1 => "\xb1",
    0x000000b2 => "\x82",
    0x000000b3 => "\x84",
    0x000000b9 => "\x81",
    0x000000bb => "\xc8",
    0x000000bd => "\x97",
    0x000000c4 => "\x80",
    0x000000c9 => "\x83",
    0x000000d6 => "\x85",
    0x000000dc => "\x86",
    0x000000df => "\xa7",
    0x000000e0 => "\x88",
    0x000000e2 => "\x89",
    0x000000e4 => "\x8a",
    0x000000e7 => "\x8d",
    0x000000e8 => "\x8f",
    0x000000e9 => "\x8e",
    0x000000ea => "\x90",
    0x000000eb => "\x91",
    0x000000ee => "\x94",
    0x000000ef => "\x95",
    0x000000f4 => "\x99",
    0x000000f6 => "\x9a",
    0x000000f7 => "\xd6",
    0x000000f9 => "\x9d",
    0x000000fb => "\x9e",
    0x000000fc => "\x9f",
    0x00000153 => "\xcf",
    0x00000384 => "\x8b",
    0x00000385 => "\x87",
    0x00000386 => "\xcd",
    0x00000387 => "\xaf",
    0x00000388 => "\xce",
    0x00000389 => "\xd7",
    0x0000038a => "\xd8",
    0x0000038c => "\xd9",
    0x0000038e => "\xda",
    0x0000038f => "\xdf",
    0x00000390 => "\xfd",
    0x00000391 => "\xb0",
    0x00000392 => "\xb5",
    0x00000393 => "\xa1",
    0x00000394 => "\xa2",
    0x00000395 => "\xb6",
    0x00000396 => "\xb7",
    0x00000397 => "\xb8",
    0x00000398 => "\xa3",
    0x00000399 => "\xb9",
    0x0000039a => "\xba",
    0x0000039b => "\xa4",
    0x0000039c => "\xbb",
    0x0000039d => "\xc1",
    0x0000039e => "\xa5",
    0x0000039f => "\xc3",
    0x000003a0 => "\xa6",
    0x000003a1 => "\xc4",
    0x000003a3 => "\xaa",
    0x000003a4 => "\xc6",
    0x000003a5 => "\xcb",
    0x000003a6 => "\xbc",
    0x000003a7 => "\xcc",
    0x000003a8 => "\xbe",
    0x000003a9 => "\xbf",
    0x000003aa => "\xab",
    0x000003ab => "\xbd",
    0x000003ac => "\xc0",
    0x000003ad => "\xdb",
    0x000003ae => "\xdc",
    0x000003af => "\xdd",
    0x000003b0 => "\xfe",
    0x000003b1 => "\xe1",
    0x000003b2 => "\xe2",
    0x000003b3 => "\xe7",
    0x000003b4 => "\xe4",
    0x000003b5 => "\xe5",
    0x000003b6 => "\xfa",
    0x000003b7 => "\xe8",
    0x000003b8 => "\xf5",
    0x000003b9 => "\xe9",
    0x000003ba => "\xeb",
    0x000003bb => "\xec",
    0x000003bc => "\xed",
    0x000003bd => "\xee",
    0x000003be => "\xea",
    0x000003bf => "\xef",
    0x000003c0 => "\xf0",
    0x000003c1 => "\xf2",
    0x000003c2 => "\xf7",
    0x000003c3 => "\xf3",
    0x000003c4 => "\xf4",
    0x000003c5 => "\xf9",
    0x000003c6 => "\xe6",
    0x000003c7 => "\xf8",
    0x000003c8 => "\xe3",
    0x000003c9 => "\xf6",
    0x000003ca => "\xfb",
    0x000003cb => "\xfc",
    0x000003cc => "\xde",
    0x000003cd => "\xe0",
    0x000003ce => "\xf1",
    0x00002013 => "\xd0",
    0x00002015 => "\xd1",
    0x00002018 => "\xd4",
    0x00002019 => "\xd5",
    0x0000201c => "\xd2",
    0x0000201d => "\xd3",
    0x00002020 => "\xa0",
    0x00002022 => "\x96",
    0x00002026 => "\xc9",
    0x00002030 => "\x98",
    0x00002122 => "\x93",
    0x00002248 => "\xc5",
    0x00002260 => "\xad",
    0x00002264 => "\xb2",
    0x00002265 => "\xb3",
);

sub _recode
{
    if ($_[0]->{_from} eq 'INTERNAL') {
		$_[1] = join '',
	        map $from_ucs4{$_} 
                || (defined $from_ucs4{$_} ? $from_ucs4{$_} : "\x3f"),
		    @{$_[1]};
    } elsif ($_[0]->{_to} eq 'UTF-8',) {
		$_[1] = join '', map $to_utf8[$_], unpack 'C*', $_[1];
    } else {
		$_[1] = [ map 
				  $to_ucs4[$_],
				  unpack 'C*', $_[1] 
				  ];
    }

return 1;
}

__END__

=head1 NAME

Locale::RecodeData::MACGREEK - Conversion routines for MACGREEK

=head1 SYNOPSIS

This module is internal to libintl.  Do not use directly!

=head1 DESCRIPTION

This module is generated and contains the conversion tables and
routines for MACGREEK.

=head1 COMMENTS

The following comments have been extracted from the original charmap:

This charmap has been generated automatically from GNU libiconv
 conversions.

Please note that aliases listed above are not necessarily valid!

=head1 CHARACTER TABLE

The following table is sorted in the same order as the original charmap.
All character codes are in hexadecimal.  Please read 'ISO-10646' as
'ISO-10646-UCS4'.

Local | ISO-10646 | Description
-------+-----------+-------------------------------------------------
    00 |  00000000 | NULL (NUL)
    01 |  00000001 | START OF HEADING (SOH)
    02 |  00000002 | START OF TEXT (STX)
    03 |  00000003 | END OF TEXT (ETX)
    04 |  00000004 | END OF TRANSMISSION (EOT)
    05 |  00000005 | ENQUIRY (ENQ)
    06 |  00000006 | ACKNOWLEDGE (ACK)
    07 |  00000007 | BELL (BEL)
    08 |  00000008 | BACKSPACE (BS)
    09 |  00000009 | CHARACTER TABULATION (HT)
    0A |  0000000A | LINE FEED (LF)
    0B |  0000000B | LINE TABULATION (VT)
    0C |  0000000C | FORM FEED (FF)
    0D |  0000000D | CARRIAGE RETURN (CR)
    0E |  0000000E | SHIFT OUT (SO)
    0F |  0000000F | SHIFT IN (SI)
    10 |  00000010 | DATALINK ESCAPE (DLE)
    11 |  00000011 | DEVICE CONTROL ONE (DC1)
    12 |  00000012 | DEVICE CONTROL TWO (DC2)
    13 |  00000013 | DEVICE CONTROL THREE (DC3)
    14 |  00000014 | DEVICE CONTROL FOUR (DC4)
    15 |  00000015 | NEGATIVE ACKNOWLEDGE (NAK)
    16 |  00000016 | SYNCHRONOUS IDLE (SYN)
    17 |  00000017 | END OF TRANSMISSION BLOCK (ETB)
    18 |  00000018 | CANCEL (CAN)
    19 |  00000019 | END OF MEDIUM (EM)
    1A |  0000001A | SUBSTITUTE (SUB)
    1B |  0000001B | ESCAPE (ESC)
    1C |  0000001C | FILE SEPARATOR (IS4)
    1D |  0000001D | GROUP SEPARATOR (IS3)
    1E |  0000001E | RECORD SEPARATOR (IS2)
    1F |  0000001F | UNIT SEPARATOR (IS1)
    20 |  00000020 | SPACE
    21 |  00000021 | EXCLAMATION MARK
    22 |  00000022 | QUOTATION MARK
    23 |  00000023 | NUMBER SIGN
    24 |  00000024 | DOLLAR SIGN
    25 |  00000025 | PERCENT SIGN
    26 |  00000026 | AMPERSAND
    27 |  00000027 | APOSTROPHE
    28 |  00000028 | LEFT PARENTHESIS
    29 |  00000029 | RIGHT PARENTHESIS
    2A |  0000002A | ASTERISK
    2B |  0000002B | PLUS SIGN
    2C |  0000002C | COMMA
    2D |  0000002D | HYPHEN-MINUS
    2E |  0000002E | FULL STOP
    2F |  0000002F | SOLIDUS
    30 |  00000030 | DIGIT ZERO
    31 |  00000031 | DIGIT ONE
    32 |  00000032 | DIGIT TWO
    33 |  00000033 | DIGIT THREE
    34 |  00000034 | DIGIT FOUR
    35 |  00000035 | DIGIT FIVE
    36 |  00000036 | DIGIT SIX
    37 |  00000037 | DIGIT SEVEN
    38 |  00000038 | DIGIT EIGHT
    39 |  00000039 | DIGIT NINE
    3A |  0000003A | COLON
    3B |  0000003B | SEMICOLON
    3C |  0000003C | LESS-THAN SIGN
    3D |  0000003D | EQUALS SIGN
    3E |  0000003E | GREATER-THAN SIGN
    3F |  0000003F | QUESTION MARK
    40 |  00000040 | COMMERCIAL AT
    41 |  00000041 | LATIN CAPITAL LETTER A
    42 |  00000042 | LATIN CAPITAL LETTER B
    43 |  00000043 | LATIN CAPITAL LETTER C
    44 |  00000044 | LATIN CAPITAL LETTER D
    45 |  00000045 | LATIN CAPITAL LETTER E
    46 |  00000046 | LATIN CAPITAL LETTER F
    47 |  00000047 | LATIN CAPITAL LETTER G
    48 |  00000048 | LATIN CAPITAL LETTER H
    49 |  00000049 | LATIN CAPITAL LETTER I
    4A |  0000004A | LATIN CAPITAL LETTER J
    4B |  0000004B | LATIN CAPITAL LETTER K
    4C |  0000004C | LATIN CAPITAL LETTER L
    4D |  0000004D | LATIN CAPITAL LETTER M
    4E |  0000004E | LATIN CAPITAL LETTER N
    4F |  0000004F | LATIN CAPITAL LETTER O
    50 |  00000050 | LATIN CAPITAL LETTER P
    51 |  00000051 | LATIN CAPITAL LETTER Q
    52 |  00000052 | LATIN CAPITAL LETTER R
    53 |  00000053 | LATIN CAPITAL LETTER S
    54 |  00000054 | LATIN CAPITAL LETTER T
    55 |  00000055 | LATIN CAPITAL LETTER U
    56 |  00000056 | LATIN CAPITAL LETTER V
    57 |  00000057 | LATIN CAPITAL LETTER W
    58 |  00000058 | LATIN CAPITAL LETTER X
    59 |  00000059 | LATIN CAPITAL LETTER Y
    5A |  0000005A | LATIN CAPITAL LETTER Z
    5B |  0000005B | LEFT SQUARE BRACKET
    5C |  0000005C | REVERSE SOLIDUS
    5D |  0000005D | RIGHT SQUARE BRACKET
    5E |  0000005E | CIRCUMFLEX ACCENT
    5F |  0000005F | LOW LINE
    60 |  00000060 | GRAVE ACCENT
    61 |  00000061 | LATIN SMALL LETTER A
    62 |  00000062 | LATIN SMALL LETTER B
    63 |  00000063 | LATIN SMALL LETTER C
    64 |  00000064 | LATIN SMALL LETTER D
    65 |  00000065 | LATIN SMALL LETTER E
    66 |  00000066 | LATIN SMALL LETTER F
    67 |  00000067 | LATIN SMALL LETTER G
    68 |  00000068 | LATIN SMALL LETTER H
    69 |  00000069 | LATIN SMALL LETTER I
    6A |  0000006A | LATIN SMALL LETTER J
    6B |  0000006B | LATIN SMALL LETTER K
    6C |  0000006C | LATIN SMALL LETTER L
    6D |  0000006D | LATIN SMALL LETTER M
    6E |  0000006E | LATIN SMALL LETTER N
    6F |  0000006F | LATIN SMALL LETTER O
    70 |  00000070 | LATIN SMALL LETTER P
    71 |  00000071 | LATIN SMALL LETTER Q
    72 |  00000072 | LATIN SMALL LETTER R
    73 |  00000073 | LATIN SMALL LETTER S
    74 |  00000074 | LATIN SMALL LETTER T
    75 |  00000075 | LATIN SMALL LETTER U
    76 |  00000076 | LATIN SMALL LETTER V
    77 |  00000077 | LATIN SMALL LETTER W
    78 |  00000078 | LATIN SMALL LETTER X
    79 |  00000079 | LATIN SMALL LETTER Y
    7A |  0000007A | LATIN SMALL LETTER Z
    7B |  0000007B | LEFT CURLY BRACKET
    7C |  0000007C | VERTICAL LINE
    7D |  0000007D | RIGHT CURLY BRACKET
    7E |  0000007E | TILDE
    7F |  0000007F | DELETE (DEL)
    80 |  000000C4 | LATIN CAPITAL LETTER A WITH DIAERESIS
    81 |  000000B9 | SUPERSCRIPT ONE
    82 |  000000B2 | SUPERSCRIPT TWO
    83 |  000000C9 | LATIN CAPITAL LETTER E WITH ACUTE
    84 |  000000B3 | SUPERSCRIPT THREE
    85 |  000000D6 | LATIN CAPITAL LETTER O WITH DIAERESIS
    86 |  000000DC | LATIN CAPITAL LETTER U WITH DIAERESIS
    87 |  00000385 | GREEK DIALYTIKA TONOS
    88 |  000000E0 | LATIN SMALL LETTER A WITH GRAVE
    89 |  000000E2 | LATIN SMALL LETTER A WITH CIRCUMFLEX
    8A |  000000E4 | LATIN SMALL LETTER A WITH DIAERESIS
    8B |  00000384 | GREEK TONOS
    8C |  000000A8 | DIAERESIS
    8D |  000000E7 | LATIN SMALL LETTER C WITH CEDILLA
    8E |  000000E9 | LATIN SMALL LETTER E WITH ACUTE
    8F |  000000E8 | LATIN SMALL LETTER E WITH GRAVE
    90 |  000000EA | LATIN SMALL LETTER E WITH CIRCUMFLEX
    91 |  000000EB | LATIN SMALL LETTER E WITH DIAERESIS
    92 |  000000A3 | POUND SIGN
    93 |  00002122 | TRADE MARK SIGN
    94 |  000000EE | LATIN SMALL LETTER I WITH CIRCUMFLEX
    95 |  000000EF | LATIN SMALL LETTER I WITH DIAERESIS
    96 |  00002022 | BULLET
    97 |  000000BD | VULGAR FRACTION ONE HALF
    98 |  00002030 | PER MILLE SIGN
    99 |  000000F4 | LATIN SMALL LETTER O WITH CIRCUMFLEX
    9A |  000000F6 | LATIN SMALL LETTER O WITH DIAERESIS
    9B |  000000A6 | BROKEN BAR
    9C |  000000AD | SOFT HYPHEN
    9D |  000000F9 | LATIN SMALL LETTER U WITH GRAVE
    9E |  000000FB | LATIN SMALL LETTER U WITH CIRCUMFLEX
    9F |  000000FC | LATIN SMALL LETTER U WITH DIAERESIS
    A0 |  00002020 | DAGGER
    A1 |  00000393 | GREEK CAPITAL LETTER GAMMA
    A2 |  00000394 | GREEK CAPITAL LETTER DELTA
    A3 |  00000398 | GREEK CAPITAL LETTER THETA
    A4 |  0000039B | GREEK CAPITAL LETTER LAMDA
    A5 |  0000039E | GREEK CAPITAL LETTER XI
    A6 |  000003A0 | GREEK CAPITAL LETTER PI
    A7 |  000000DF | LATIN SMALL LETTER SHARP S
    A8 |  000000AE | REGISTERED SIGN
    A9 |  000000A9 | COPYRIGHT SIGN
    AA |  000003A3 | GREEK CAPITAL LETTER SIGMA
    AB |  000003AA | GREEK CAPITAL LETTER IOTA WITH DIALYTIKA
    AC |  000000A7 | SECTION SIGN
    AD |  00002260 | NOT EQUAL TO
    AE |  000000B0 | DEGREE SIGN
    AF |  00000387 | GREEK ANO TELEIA
    B0 |  00000391 | GREEK CAPITAL LETTER ALPHA
    B1 |  000000B1 | PLUS-MINUS SIGN
    B2 |  00002264 | LESS-THAN OR EQUAL TO
    B3 |  00002265 | GREATER-THAN OR EQUAL TO
    B4 |  000000A5 | YEN SIGN
    B5 |  00000392 | GREEK CAPITAL LETTER BETA
    B6 |  00000395 | GREEK CAPITAL LETTER EPSILON
    B7 |  00000396 | GREEK CAPITAL LETTER ZETA
    B8 |  00000397 | GREEK CAPITAL LETTER ETA
    B9 |  00000399 | GREEK CAPITAL LETTER IOTA
    BA |  0000039A | GREEK CAPITAL LETTER KAPPA
    BB |  0000039C | GREEK CAPITAL LETTER MU
    BC |  000003A6 | GREEK CAPITAL LETTER PHI
    BD |  000003AB | GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA
    BE |  000003A8 | GREEK CAPITAL LETTER PSI
    BF |  000003A9 | GREEK CAPITAL LETTER OMEGA
    C0 |  000003AC | GREEK SMALL LETTER ALPHA WITH TONOS
    C1 |  0000039D | GREEK CAPITAL LETTER NU
    C2 |  000000AC | NOT SIGN
    C3 |  0000039F | GREEK CAPITAL LETTER OMICRON
    C4 |  000003A1 | GREEK CAPITAL LETTER RHO
    C5 |  00002248 | ALMOST EQUAL TO
    C6 |  000003A4 | GREEK CAPITAL LETTER TAU
    C7 |  000000AB | LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
    C8 |  000000BB | RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
    C9 |  00002026 | HORIZONTAL ELLIPSIS
    CA |  000000A0 | NO-BREAK SPACE
    CB |  000003A5 | GREEK CAPITAL LETTER UPSILON
    CC |  000003A7 | GREEK CAPITAL LETTER CHI
    CD |  00000386 | GREEK CAPITAL LETTER ALPHA WITH TONOS
    CE |  00000388 | GREEK CAPITAL LETTER EPSILON WITH TONOS
    CF |  00000153 | LATIN SMALL LIGATURE OE
    D0 |  00002013 | EN DASH
    D1 |  00002015 | HORIZONTAL BAR
    D2 |  0000201C | LEFT DOUBLE QUOTATION MARK
    D3 |  0000201D | RIGHT DOUBLE QUOTATION MARK
    D4 |  00002018 | LEFT SINGLE QUOTATION MARK
    D5 |  00002019 | RIGHT SINGLE QUOTATION MARK
    D6 |  000000F7 | DIVISION SIGN
    D7 |  00000389 | GREEK CAPITAL LETTER ETA WITH TONOS
    D8 |  0000038A | GREEK CAPITAL LETTER IOTA WITH TONOS
    D9 |  0000038C | GREEK CAPITAL LETTER OMICRON WITH TONOS
    DA |  0000038E | GREEK CAPITAL LETTER UPSILON WITH TONOS
    DB |  000003AD | GREEK SMALL LETTER EPSILON WITH TONOS
    DC |  000003AE | GREEK SMALL LETTER ETA WITH TONOS
    DD |  000003AF | GREEK SMALL LETTER IOTA WITH TONOS
    DE |  000003CC | GREEK SMALL LETTER OMICRON WITH TONOS
    DF |  0000038F | GREEK CAPITAL LETTER OMEGA WITH TONOS
    E0 |  000003CD | GREEK SMALL LETTER UPSILON WITH TONOS
    E1 |  000003B1 | GREEK SMALL LETTER ALPHA
    E2 |  000003B2 | GREEK SMALL LETTER BETA
    E3 |  000003C8 | GREEK SMALL LETTER PSI
    E4 |  000003B4 | GREEK SMALL LETTER DELTA
    E5 |  000003B5 | GREEK SMALL LETTER EPSILON
    E6 |  000003C6 | GREEK SMALL LETTER PHI
    E7 |  000003B3 | GREEK SMALL LETTER GAMMA
    E8 |  000003B7 | GREEK SMALL LETTER ETA
    E9 |  000003B9 | GREEK SMALL LETTER IOTA
    EA |  000003BE | GREEK SMALL LETTER XI
    EB |  000003BA | GREEK SMALL LETTER KAPPA
    EC |  000003BB | GREEK SMALL LETTER LAMDA
    ED |  000003BC | GREEK SMALL LETTER MU
    EE |  000003BD | GREEK SMALL LETTER NU
    EF |  000003BF | GREEK SMALL LETTER OMICRON
    F0 |  000003C0 | GREEK SMALL LETTER PI
    F1 |  000003CE | GREEK SMALL LETTER OMEGA WITH TONOS
    F2 |  000003C1 | GREEK SMALL LETTER RHO
    F3 |  000003C3 | GREEK SMALL LETTER SIGMA
    F4 |  000003C4 | GREEK SMALL LETTER TAU
    F5 |  000003B8 | GREEK SMALL LETTER THETA
    F6 |  000003C9 | GREEK SMALL LETTER OMEGA
    F7 |  000003C2 | GREEK SMALL LETTER FINAL SIGMA
    F8 |  000003C7 | GREEK SMALL LETTER CHI
    F9 |  000003C5 | GREEK SMALL LETTER UPSILON
    FA |  000003B6 | GREEK SMALL LETTER ZETA
    FB |  000003CA | GREEK SMALL LETTER IOTA WITH DIALYTIKA
    FC |  000003CB | GREEK SMALL LETTER UPSILON WITH DIALYTIKA
    FD |  00000390 | GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS
    FE |  000003B0 | GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS

=head1 AUTHOR

=head1 SEE ALSO

Locale::RecodeData(3), Locale::Recode(3), perl(1)

=cut
Local Variables:
mode: perl
perl-indent-level: 4
perl-continued-statement-offset: 4
perl-continued-brace-offset: 0
perl-brace-offset: -4
perl-brace-imaginary-offset: 0
perl-label-offset: -4
cperl-indent-level: 4
cperl-continued-statement-offset: 2
tab-width: 4
End:

cmd: