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/IBM855.pm (27524B)

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

# Conversion routines for IBM855.
# 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::IBM855;

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,
    0x0452,
    0x0402,
    0x0453,
    0x0403,
    0x0451,
    0x0401,
    0x0454,
    0x0404,
    0x0455,
    0x0405,
    0x0456,
    0x0406,
    0x0457,
    0x0407,
    0x0458,
    0x0408,
    0x0459,
    0x0409,
    0x045a,
    0x040a,
    0x045b,
    0x040b,
    0x045c,
    0x040c,
    0x045e,
    0x040e,
    0x045f,
    0x040f,
    0x044e,
    0x042e,
    0x044a,
    0x042a,
    0x0430,
    0x0410,
    0x0431,
    0x0411,
    0x0446,
    0x0426,
    0x0434,
    0x0414,
    0x0435,
    0x0415,
    0x0444,
    0x0424,
    0x0433,
    0x0413,
    0x00ab,
    0x00bb,
    0x2591,
    0x2592,
    0x2593,
    0x2502,
    0x2524,
    0x0445,
    0x0425,
    0x0438,
    0x0418,
    0x2563,
    0x2551,
    0x2557,
    0x255d,
    0x0439,
    0x0419,
    0x2510,
    0x2514,
    0x2534,
    0x252c,
    0x251c,
    0x2500,
    0x253c,
    0x043a,
    0x041a,
    0x255a,
    0x2554,
    0x2569,
    0x2566,
    0x2560,
    0x2550,
    0x256c,
    0x00a4,
    0x043b,
    0x041b,
    0x043c,
    0x041c,
    0x043d,
    0x041d,
    0x043e,
    0x041e,
    0x043f,
    0x2518,
    0x250c,
    0x2588,
    0x2584,
    0x041f,
    0x044f,
    0x2580,
    0x042f,
    0x0440,
    0x0420,
    0x0441,
    0x0421,
    0x0442,
    0x0422,
    0x0443,
    0x0423,
    0x0436,
    0x0416,
    0x0432,
    0x0412,
    0x044c,
    0x042c,
    0x2116,
    0x00ad,
    0x044b,
    0x042b,
    0x0437,
    0x0417,
    0x0448,
    0x0428,
    0x044d,
    0x042d,
    0x0449,
    0x0429,
    0x0447,
    0x0427,
    0x00a7,
    0x25a0,
    0x00a0,
);

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",
    "\xd1\x92",
    "\xd0\x82",
    "\xd1\x93",
    "\xd0\x83",
    "\xd1\x91",
    "\xd0\x81",
    "\xd1\x94",
    "\xd0\x84",
    "\xd1\x95",
    "\xd0\x85",
    "\xd1\x96",
    "\xd0\x86",
    "\xd1\x97",
    "\xd0\x87",
    "\xd1\x98",
    "\xd0\x88",
    "\xd1\x99",
    "\xd0\x89",
    "\xd1\x9a",
    "\xd0\x8a",
    "\xd1\x9b",
    "\xd0\x8b",
    "\xd1\x9c",
    "\xd0\x8c",
    "\xd1\x9e",
    "\xd0\x8e",
    "\xd1\x9f",
    "\xd0\x8f",
    "\xd1\x8e",
    "\xd0\xae",
    "\xd1\x8a",
    "\xd0\xaa",
    "\xd0\xb0",
    "\xd0\x90",
    "\xd0\xb1",
    "\xd0\x91",
    "\xd1\x86",
    "\xd0\xa6",
    "\xd0\xb4",
    "\xd0\x94",
    "\xd0\xb5",
    "\xd0\x95",
    "\xd1\x84",
    "\xd0\xa4",
    "\xd0\xb3",
    "\xd0\x93",
    "\xc2\xab",
    "\xc2\xbb",
    "\xe2\x96\x91",
    "\xe2\x96\x92",
    "\xe2\x96\x93",
    "\xe2\x94\x82",
    "\xe2\x94\xa4",
    "\xd1\x85",
    "\xd0\xa5",
    "\xd0\xb8",
    "\xd0\x98",
    "\xe2\x95\xa3",
    "\xe2\x95\x91",
    "\xe2\x95\x97",
    "\xe2\x95\x9d",
    "\xd0\xb9",
    "\xd0\x99",
    "\xe2\x94\x90",
    "\xe2\x94\x94",
    "\xe2\x94\xb4",
    "\xe2\x94\xac",
    "\xe2\x94\x9c",
    "\xe2\x94\x80",
    "\xe2\x94\xbc",
    "\xd0\xba",
    "\xd0\x9a",
    "\xe2\x95\x9a",
    "\xe2\x95\x94",
    "\xe2\x95\xa9",
    "\xe2\x95\xa6",
    "\xe2\x95\xa0",
    "\xe2\x95\x90",
    "\xe2\x95\xac",
    "\xc2\xa4",
    "\xd0\xbb",
    "\xd0\x9b",
    "\xd0\xbc",
    "\xd0\x9c",
    "\xd0\xbd",
    "\xd0\x9d",
    "\xd0\xbe",
    "\xd0\x9e",
    "\xd0\xbf",
    "\xe2\x94\x98",
    "\xe2\x94\x8c",
    "\xe2\x96\x88",
    "\xe2\x96\x84",
    "\xd0\x9f",
    "\xd1\x8f",
    "\xe2\x96\x80",
    "\xd0\xaf",
    "\xd1\x80",
    "\xd0\xa0",
    "\xd1\x81",
    "\xd0\xa1",
    "\xd1\x82",
    "\xd0\xa2",
    "\xd1\x83",
    "\xd0\xa3",
    "\xd0\xb6",
    "\xd0\x96",
    "\xd0\xb2",
    "\xd0\x92",
    "\xd1\x8c",
    "\xd0\xac",
    "\xe2\x84\x96",
    "\xc2\xad",
    "\xd1\x8b",
    "\xd0\xab",
    "\xd0\xb7",
    "\xd0\x97",
    "\xd1\x88",
    "\xd0\xa8",
    "\xd1\x8d",
    "\xd0\xad",
    "\xd1\x89",
    "\xd0\xa9",
    "\xd1\x87",
    "\xd0\xa7",
    "\xc2\xa7",
    "\xe2\x96\xa0",
    "\xc2\xa0",
);

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 => "\xff",
    0x000000a4 => "\xcf",
    0x000000a7 => "\xfd",
    0x000000ab => "\xae",
    0x000000ad => "\xf0",
    0x000000bb => "\xaf",
    0x00000401 => "\x85",
    0x00000402 => "\x81",
    0x00000403 => "\x83",
    0x00000404 => "\x87",
    0x00000405 => "\x89",
    0x00000406 => "\x8b",
    0x00000407 => "\x8d",
    0x00000408 => "\x8f",
    0x00000409 => "\x91",
    0x0000040a => "\x93",
    0x0000040b => "\x95",
    0x0000040c => "\x97",
    0x0000040e => "\x99",
    0x0000040f => "\x9b",
    0x00000410 => "\xa1",
    0x00000411 => "\xa3",
    0x00000412 => "\xec",
    0x00000413 => "\xad",
    0x00000414 => "\xa7",
    0x00000415 => "\xa9",
    0x00000416 => "\xea",
    0x00000417 => "\xf4",
    0x00000418 => "\xb8",
    0x00000419 => "\xbe",
    0x0000041a => "\xc7",
    0x0000041b => "\xd1",
    0x0000041c => "\xd3",
    0x0000041d => "\xd5",
    0x0000041e => "\xd7",
    0x0000041f => "\xdd",
    0x00000420 => "\xe2",
    0x00000421 => "\xe4",
    0x00000422 => "\xe6",
    0x00000423 => "\xe8",
    0x00000424 => "\xab",
    0x00000425 => "\xb6",
    0x00000426 => "\xa5",
    0x00000427 => "\xfc",
    0x00000428 => "\xf6",
    0x00000429 => "\xfa",
    0x0000042a => "\x9f",
    0x0000042b => "\xf2",
    0x0000042c => "\xee",
    0x0000042d => "\xf8",
    0x0000042e => "\x9d",
    0x0000042f => "\xe0",
    0x00000430 => "\xa0",
    0x00000431 => "\xa2",
    0x00000432 => "\xeb",
    0x00000433 => "\xac",
    0x00000434 => "\xa6",
    0x00000435 => "\xa8",
    0x00000436 => "\xe9",
    0x00000437 => "\xf3",
    0x00000438 => "\xb7",
    0x00000439 => "\xbd",
    0x0000043a => "\xc6",
    0x0000043b => "\xd0",
    0x0000043c => "\xd2",
    0x0000043d => "\xd4",
    0x0000043e => "\xd6",
    0x0000043f => "\xd8",
    0x00000440 => "\xe1",
    0x00000441 => "\xe3",
    0x00000442 => "\xe5",
    0x00000443 => "\xe7",
    0x00000444 => "\xaa",
    0x00000445 => "\xb5",
    0x00000446 => "\xa4",
    0x00000447 => "\xfb",
    0x00000448 => "\xf5",
    0x00000449 => "\xf9",
    0x0000044a => "\x9e",
    0x0000044b => "\xf1",
    0x0000044c => "\xed",
    0x0000044d => "\xf7",
    0x0000044e => "\x9c",
    0x0000044f => "\xde",
    0x00000451 => "\x84",
    0x00000452 => "\x80",
    0x00000453 => "\x82",
    0x00000454 => "\x86",
    0x00000455 => "\x88",
    0x00000456 => "\x8a",
    0x00000457 => "\x8c",
    0x00000458 => "\x8e",
    0x00000459 => "\x90",
    0x0000045a => "\x92",
    0x0000045b => "\x94",
    0x0000045c => "\x96",
    0x0000045e => "\x98",
    0x0000045f => "\x9a",
    0x00002116 => "\xef",
    0x00002500 => "\xc4",
    0x00002502 => "\xb3",
    0x0000250c => "\xda",
    0x00002510 => "\xbf",
    0x00002514 => "\xc0",
    0x00002518 => "\xd9",
    0x0000251c => "\xc3",
    0x00002524 => "\xb4",
    0x0000252c => "\xc2",
    0x00002534 => "\xc1",
    0x0000253c => "\xc5",
    0x00002550 => "\xcd",
    0x00002551 => "\xba",
    0x00002554 => "\xc9",
    0x00002557 => "\xbb",
    0x0000255a => "\xc8",
    0x0000255d => "\xbc",
    0x00002560 => "\xcc",
    0x00002563 => "\xb9",
    0x00002566 => "\xcb",
    0x00002569 => "\xca",
    0x0000256c => "\xce",
    0x00002580 => "\xdf",
    0x00002584 => "\xdc",
    0x00002588 => "\xdb",
    0x00002591 => "\xb0",
    0x00002592 => "\xb1",
    0x00002593 => "\xb2",
    0x000025a0 => "\xfe",
);

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::IBM855 - Conversion routines for IBM855

=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 IBM855.

=head1 COMMENTS

The following comments have been extracted from the original charmap:

version: 1.0
  source: IBM NLS RM Vol2 SE09-8002-01, March 1990
 alias CP855
 alias 855

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 |  00000452 | CYRILLIC SMALL LETTER DJE (Serbocroatian)
    81 |  00000402 | CYRILLIC CAPITAL LETTER DJE (Serbocroatian)
    82 |  00000453 | CYRILLIC SMALL LETTER GJE
    83 |  00000403 | CYRILLIC CAPITAL LETTER GJE
    84 |  00000451 | CYRILLIC SMALL LETTER IO
    85 |  00000401 | CYRILLIC CAPITAL LETTER IO
    86 |  00000454 | CYRILLIC SMALL LETTER UKRAINIAN IE
    87 |  00000404 | CYRILLIC CAPITAL LETTER UKRAINIAN IE
    88 |  00000455 | CYRILLIC SMALL LETTER DZE
    89 |  00000405 | CYRILLIC CAPITAL LETTER DZE
    8A |  00000456 | CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I
    8B |  00000406 | CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I
    8C |  00000457 | CYRILLIC SMALL LETTER YI (Ukrainian)
    8D |  00000407 | CYRILLIC CAPITAL LETTER YI (Ukrainian)
    8E |  00000458 | CYRILLIC SMALL LETTER JE
    8F |  00000408 | CYRILLIC CAPITAL LETTER JE
    90 |  00000459 | CYRILLIC SMALL LETTER LJE
    91 |  00000409 | CYRILLIC CAPITAL LETTER LJE
    92 |  0000045A | CYRILLIC SMALL LETTER NJE
    93 |  0000040A | CYRILLIC CAPITAL LETTER NJE
    94 |  0000045B | CYRILLIC SMALL LETTER TSHE (Serbocroatian)
    95 |  0000040B | CYRILLIC CAPITAL LETTER TSHE
    96 |  0000045C | CYRILLIC SMALL LETTER KJE
    97 |  0000040C | CYRILLIC CAPITAL LETTER KJE
    98 |  0000045E | CYRILLIC SMALL LETTER SHORT U (Byelorussian)
    99 |  0000040E | CYRILLIC CAPITAL LETTER SHORT U (Byelorussian)
    9A |  0000045F | CYRILLIC SMALL LETTER DZHE
    9B |  0000040F | CYRILLIC CAPITAL LETTER DZHE
    9C |  0000044E | CYRILLIC SMALL LETTER YU
    9D |  0000042E | CYRILLIC CAPITAL LETTER YU
    9E |  0000044A | CYRILLIC SMALL LETTER HARD SIGN
    9F |  0000042A | CYRILLIC CAPITAL LETTER HARD SIGN
    A0 |  00000430 | CYRILLIC SMALL LETTER A
    A1 |  00000410 | CYRILLIC CAPITAL LETTER A
    A2 |  00000431 | CYRILLIC SMALL LETTER BE
    A3 |  00000411 | CYRILLIC CAPITAL LETTER BE
    A4 |  00000446 | CYRILLIC SMALL LETTER TSE
    A5 |  00000426 | CYRILLIC CAPITAL LETTER TSE
    A6 |  00000434 | CYRILLIC SMALL LETTER DE
    A7 |  00000414 | CYRILLIC CAPITAL LETTER DE
    A8 |  00000435 | CYRILLIC SMALL LETTER IE
    A9 |  00000415 | CYRILLIC CAPITAL LETTER IE
    AA |  00000444 | CYRILLIC SMALL LETTER EF
    AB |  00000424 | CYRILLIC CAPITAL LETTER EF
    AC |  00000433 | CYRILLIC SMALL LETTER GHE
    AD |  00000413 | CYRILLIC CAPITAL LETTER GHE
    AE |  000000AB | LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
    AF |  000000BB | RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
    B0 |  00002591 | LIGHT SHADE
    B1 |  00002592 | MEDIUM SHADE
    B2 |  00002593 | DARK SHADE
    B3 |  00002502 | BOX DRAWINGS LIGHT VERTICAL
    B4 |  00002524 | BOX DRAWINGS LIGHT VERTICAL AND LEFT
    B5 |  00000445 | CYRILLIC SMALL LETTER HA
    B6 |  00000425 | CYRILLIC CAPITAL LETTER HA
    B7 |  00000438 | CYRILLIC SMALL LETTER I
    B8 |  00000418 | CYRILLIC CAPITAL LETTER I
    B9 |  00002563 | BOX DRAWINGS DOUBLE VERTICAL AND LEFT
    BA |  00002551 | BOX DRAWINGS DOUBLE VERTICAL
    BB |  00002557 | BOX DRAWINGS DOUBLE DOWN AND LEFT
    BC |  0000255D | BOX DRAWINGS DOUBLE UP AND LEFT
    BD |  00000439 | CYRILLIC SMALL LETTER SHORT I
    BE |  00000419 | CYRILLIC CAPITAL LETTER SHORT I
    BF |  00002510 | BOX DRAWINGS LIGHT DOWN AND LEFT
    C0 |  00002514 | BOX DRAWINGS LIGHT UP AND RIGHT
    C1 |  00002534 | BOX DRAWINGS LIGHT UP AND HORIZONTAL
    C2 |  0000252C | BOX DRAWINGS LIGHT DOWN AND HORIZONTAL
    C3 |  0000251C | BOX DRAWINGS LIGHT VERTICAL AND RIGHT
    C4 |  00002500 | BOX DRAWINGS LIGHT HORIZONTAL
    C5 |  0000253C | BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL
    C6 |  0000043A | CYRILLIC SMALL LETTER KA
    C7 |  0000041A | CYRILLIC CAPITAL LETTER KA
    C8 |  0000255A | BOX DRAWINGS DOUBLE UP AND RIGHT
    C9 |  00002554 | BOX DRAWINGS DOUBLE DOWN AND RIGHT
    CA |  00002569 | BOX DRAWINGS DOUBLE UP AND HORIZONTAL
    CB |  00002566 | BOX DRAWINGS DOUBLE DOWN AND HORIZONTAL
    CC |  00002560 | BOX DRAWINGS DOUBLE VERTICAL AND RIGHT
    CD |  00002550 | BOX DRAWINGS DOUBLE HORIZONTAL
    CE |  0000256C | BOX DRAWINGS DOUBLE VERTICAL AND HORIZONTAL
    CF |  000000A4 | CURRENCY SIGN
    D0 |  0000043B | CYRILLIC SMALL LETTER EL
    D1 |  0000041B | CYRILLIC CAPITAL LETTER EL
    D2 |  0000043C | CYRILLIC SMALL LETTER EM
    D3 |  0000041C | CYRILLIC CAPITAL LETTER EM
    D4 |  0000043D | CYRILLIC SMALL LETTER EN
    D5 |  0000041D | CYRILLIC CAPITAL LETTER EN
    D6 |  0000043E | CYRILLIC SMALL LETTER O
    D7 |  0000041E | CYRILLIC CAPITAL LETTER O
    D8 |  0000043F | CYRILLIC SMALL LETTER PE
    D9 |  00002518 | BOX DRAWINGS LIGHT UP AND LEFT
    DA |  0000250C | BOX DRAWINGS LIGHT DOWN AND RIGHT
    DB |  00002588 | FULL BLOCK
    DC |  00002584 | LOWER HALF BLOCK
    DD |  0000041F | CYRILLIC CAPITAL LETTER PE
    DE |  0000044F | CYRILLIC SMALL LETTER YA
    DF |  00002580 | UPPER HALF BLOCK
    E0 |  0000042F | CYRILLIC CAPITAL LETTER YA
    E1 |  00000440 | CYRILLIC SMALL LETTER ER
    E2 |  00000420 | CYRILLIC CAPITAL LETTER ER
    E3 |  00000441 | CYRILLIC SMALL LETTER ES
    E4 |  00000421 | CYRILLIC CAPITAL LETTER ES
    E5 |  00000442 | CYRILLIC SMALL LETTER TE
    E6 |  00000422 | CYRILLIC CAPITAL LETTER TE
    E7 |  00000443 | CYRILLIC SMALL LETTER U
    E8 |  00000423 | CYRILLIC CAPITAL LETTER U
    E9 |  00000436 | CYRILLIC SMALL LETTER ZHE
    EA |  00000416 | CYRILLIC CAPITAL LETTER ZHE
    EB |  00000432 | CYRILLIC SMALL LETTER VE
    EC |  00000412 | CYRILLIC CAPITAL LETTER VE
    ED |  0000044C | CYRILLIC SMALL LETTER SOFT SIGN
    EE |  0000042C | CYRILLIC CAPITAL LETTER SOFT SIGN
    EF |  00002116 | NUMERO SIGN
    F0 |  000000AD | SOFT HYPHEN
    F1 |  0000044B | CYRILLIC SMALL LETTER YERU
    F2 |  0000042B | CYRILLIC CAPITAL LETTER YERU
    F3 |  00000437 | CYRILLIC SMALL LETTER ZE
    F4 |  00000417 | CYRILLIC CAPITAL LETTER ZE
    F5 |  00000448 | CYRILLIC SMALL LETTER SHA
    F6 |  00000428 | CYRILLIC CAPITAL LETTER SHA
    F7 |  0000044D | CYRILLIC SMALL LETTER E
    F8 |  0000042D | CYRILLIC CAPITAL LETTER E
    F9 |  00000449 | CYRILLIC SMALL LETTER SHCHA
    FA |  00000429 | CYRILLIC CAPITAL LETTER SHCHA
    FB |  00000447 | CYRILLIC SMALL LETTER CHE
    FC |  00000427 | CYRILLIC CAPITAL LETTER CHE
    FD |  000000A7 | SECTION SIGN
    FE |  000025A0 | BLACK SQUARE
    FF |  000000A0 | NO-BREAK SPACE

=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: