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/INIS_CYRILLIC.pm (18557B)

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

# Conversion routines for INIS-CYRILLIC.
# 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::INIS_CYRILLIC;

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,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0x221a,
    0xfffd,
    0x2192,
    0x222b,
    0x03b1,
    0x03b2,
    0x03b3,
    0x03b4,
    0x03a3,
    0x03bc,
    0x03bd,
    0x03c9,
    0x03c0,
    0x039e,
    0x0394,
    0x039b,
    0x03a9,
    0x042a,
    0x207b,
    0x207a,
    0x044e,
    0x0430,
    0x0431,
    0x0446,
    0x0434,
    0x0435,
    0x0444,
    0x0433,
    0x0445,
    0x0438,
    0x0439,
    0x043a,
    0x043b,
    0x043c,
    0x043d,
    0x043e,
    0x043f,
    0x044f,
    0x0440,
    0x0441,
    0x0442,
    0x0443,
    0x0436,
    0x0432,
    0x044c,
    0x044b,
    0x0437,
    0x0448,
    0x044d,
    0x0449,
    0x0447,
    0x044a,
    0x042e,
    0x0410,
    0x0411,
    0x0426,
    0x0414,
    0x0415,
    0x0424,
    0x0413,
    0x0425,
    0x0418,
    0x0419,
    0x041a,
    0x041b,
    0x041c,
    0x041d,
    0x041e,
    0x041f,
    0x042f,
    0x0420,
    0x0421,
    0x0422,
    0x0423,
    0x0416,
    0x0412,
    0x042c,
    0x042b,
    0x0417,
    0x0428,
    0x042d,
    0x0429,
    0x0427,
    0x007f,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    0xfffd,
    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",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xe2\x88\x9a",
    "\xef\xbf\xbd",
    "\xe2\x86\x92",
    "\xe2\x88\xab",
    "\xce\xb1",
    "\xce\xb2",
    "\xce\xb3",
    "\xce\xb4",
    "\xce\xa3",
    "\xce\xbc",
    "\xce\xbd",
    "\xcf\x89",
    "\xcf\x80",
    "\xce\x9e",
    "\xce\x94",
    "\xce\x9b",
    "\xce\xa9",
    "\xd0\xaa",
    "\xe2\x81\xbb",
    "\xe2\x81\xba",
    "\xd1\x8e",
    "\xd0\xb0",
    "\xd0\xb1",
    "\xd1\x86",
    "\xd0\xb4",
    "\xd0\xb5",
    "\xd1\x84",
    "\xd0\xb3",
    "\xd1\x85",
    "\xd0\xb8",
    "\xd0\xb9",
    "\xd0\xba",
    "\xd0\xbb",
    "\xd0\xbc",
    "\xd0\xbd",
    "\xd0\xbe",
    "\xd0\xbf",
    "\xd1\x8f",
    "\xd1\x80",
    "\xd1\x81",
    "\xd1\x82",
    "\xd1\x83",
    "\xd0\xb6",
    "\xd0\xb2",
    "\xd1\x8c",
    "\xd1\x8b",
    "\xd0\xb7",
    "\xd1\x88",
    "\xd1\x8d",
    "\xd1\x89",
    "\xd1\x87",
    "\xd1\x8a",
    "\xd0\xae",
    "\xd0\x90",
    "\xd0\x91",
    "\xd0\xa6",
    "\xd0\x94",
    "\xd0\x95",
    "\xd0\xa4",
    "\xd0\x93",
    "\xd0\xa5",
    "\xd0\x98",
    "\xd0\x99",
    "\xd0\x9a",
    "\xd0\x9b",
    "\xd0\x9c",
    "\xd0\x9d",
    "\xd0\x9e",
    "\xd0\x9f",
    "\xd0\xaf",
    "\xd0\xa0",
    "\xd0\xa1",
    "\xd0\xa2",
    "\xd0\xa3",
    "\xd0\x96",
    "\xd0\x92",
    "\xd0\xac",
    "\xd0\xab",
    "\xd0\x97",
    "\xd0\xa8",
    "\xd0\xad",
    "\xd0\xa9",
    "\xd0\xa7",
    "\x7f",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\xef\xbf\xbd",
    "\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",
    0x0000007f => "\x7f",
    0x00000394 => "\x3a",
    0x0000039b => "\x3b",
    0x0000039e => "\x39",
    0x000003a3 => "\x34",
    0x000003a9 => "\x3c",
    0x000003b1 => "\x30",
    0x000003b2 => "\x31",
    0x000003b3 => "\x32",
    0x000003b4 => "\x33",
    0x000003bc => "\x35",
    0x000003bd => "\x36",
    0x000003c0 => "\x38",
    0x000003c9 => "\x37",
    0x00000410 => "\x61",
    0x00000411 => "\x62",
    0x00000412 => "\x77",
    0x00000413 => "\x67",
    0x00000414 => "\x64",
    0x00000415 => "\x65",
    0x00000416 => "\x76",
    0x00000417 => "\x7a",
    0x00000418 => "\x69",
    0x00000419 => "\x6a",
    0x0000041a => "\x6b",
    0x0000041b => "\x6c",
    0x0000041c => "\x6d",
    0x0000041d => "\x6e",
    0x0000041e => "\x6f",
    0x0000041f => "\x70",
    0x00000420 => "\x72",
    0x00000421 => "\x73",
    0x00000422 => "\x74",
    0x00000423 => "\x75",
    0x00000424 => "\x66",
    0x00000425 => "\x68",
    0x00000426 => "\x63",
    0x00000427 => "\x7e",
    0x00000428 => "\x7b",
    0x00000429 => "\x7d",
    0x0000042a => "\x3d",
    0x0000042b => "\x79",
    0x0000042c => "\x78",
    0x0000042d => "\x7c",
    0x0000042e => "\x60",
    0x0000042f => "\x71",
    0x00000430 => "\x41",
    0x00000431 => "\x42",
    0x00000432 => "\x57",
    0x00000433 => "\x47",
    0x00000434 => "\x44",
    0x00000435 => "\x45",
    0x00000436 => "\x56",
    0x00000437 => "\x5a",
    0x00000438 => "\x49",
    0x00000439 => "\x4a",
    0x0000043a => "\x4b",
    0x0000043b => "\x4c",
    0x0000043c => "\x4d",
    0x0000043d => "\x4e",
    0x0000043e => "\x4f",
    0x0000043f => "\x50",
    0x00000440 => "\x52",
    0x00000441 => "\x53",
    0x00000442 => "\x54",
    0x00000443 => "\x55",
    0x00000444 => "\x46",
    0x00000445 => "\x48",
    0x00000446 => "\x43",
    0x00000447 => "\x5e",
    0x00000448 => "\x5b",
    0x00000449 => "\x5d",
    0x0000044a => "\x5f",
    0x0000044b => "\x59",
    0x0000044c => "\x58",
    0x0000044d => "\x5c",
    0x0000044e => "\x40",
    0x0000044f => "\x51",
    0x0000207a => "\x3f",
    0x0000207b => "\x3e",
    0x00002192 => "\x2e",
    0x0000221a => "\x2c",
    0x0000222b => "\x2f",
);

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

=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 INIS-CYRILLIC.

=head1 COMMENTS

The following comments have been extracted from the original charmap:

version: 1.0
  source: ECMA registry
 alias ISO-IR-51

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
    2C |  0000221A | SQUARE ROOT
    2E |  00002192 | RIGHTWARDS ARROW
    2F |  0000222B | INTEGRAL
    30 |  000003B1 | GREEK SMALL LETTER ALPHA
    31 |  000003B2 | GREEK SMALL LETTER BETA
    32 |  000003B3 | GREEK SMALL LETTER GAMMA
    33 |  000003B4 | GREEK SMALL LETTER DELTA
    34 |  000003A3 | GREEK CAPITAL LETTER SIGMA
    35 |  000003BC | GREEK SMALL LETTER MU
    36 |  000003BD | GREEK SMALL LETTER NU
    37 |  000003C9 | GREEK SMALL LETTER OMEGA
    38 |  000003C0 | GREEK SMALL LETTER PI
    39 |  0000039E | GREEK CAPITAL LETTER XI
    3A |  00000394 | GREEK CAPITAL LETTER DELTA
    3B |  0000039B | GREEK CAPITAL LETTER LAMDA
    3C |  000003A9 | GREEK CAPITAL LETTER OMEGA
    3D |  0000042A | CYRILLIC CAPITAL LETTER HARD SIGN
    3E |  0000207B | SUPERSCRIPT MINUS
    3F |  0000207A | SUPERSCRIPT PLUS SIGN
    40 |  0000044E | CYRILLIC SMALL LETTER YU
    41 |  00000430 | CYRILLIC SMALL LETTER A
    42 |  00000431 | CYRILLIC SMALL LETTER BE
    43 |  00000446 | CYRILLIC SMALL LETTER TSE
    44 |  00000434 | CYRILLIC SMALL LETTER DE
    45 |  00000435 | CYRILLIC SMALL LETTER IE
    46 |  00000444 | CYRILLIC SMALL LETTER EF
    47 |  00000433 | CYRILLIC SMALL LETTER GHE
    48 |  00000445 | CYRILLIC SMALL LETTER HA
    49 |  00000438 | CYRILLIC SMALL LETTER I
    4A |  00000439 | CYRILLIC SMALL LETTER SHORT I
    4B |  0000043A | CYRILLIC SMALL LETTER KA
    4C |  0000043B | CYRILLIC SMALL LETTER EL
    4D |  0000043C | CYRILLIC SMALL LETTER EM
    4E |  0000043D | CYRILLIC SMALL LETTER EN
    4F |  0000043E | CYRILLIC SMALL LETTER O
    50 |  0000043F | CYRILLIC SMALL LETTER PE
    51 |  0000044F | CYRILLIC SMALL LETTER YA
    52 |  00000440 | CYRILLIC SMALL LETTER ER
    53 |  00000441 | CYRILLIC SMALL LETTER ES
    54 |  00000442 | CYRILLIC SMALL LETTER TE
    55 |  00000443 | CYRILLIC SMALL LETTER U
    56 |  00000436 | CYRILLIC SMALL LETTER ZHE
    57 |  00000432 | CYRILLIC SMALL LETTER VE
    58 |  0000044C | CYRILLIC SMALL LETTER SOFT SIGN
    59 |  0000044B | CYRILLIC SMALL LETTER YERU
    5A |  00000437 | CYRILLIC SMALL LETTER ZE
    5B |  00000448 | CYRILLIC SMALL LETTER SHA
    5C |  0000044D | CYRILLIC SMALL LETTER E
    5D |  00000449 | CYRILLIC SMALL LETTER SHCHA
    5E |  00000447 | CYRILLIC SMALL LETTER CHE
    5F |  0000044A | CYRILLIC SMALL LETTER HARD SIGN
    60 |  0000042E | CYRILLIC CAPITAL LETTER YU
    61 |  00000410 | CYRILLIC CAPITAL LETTER A
    62 |  00000411 | CYRILLIC CAPITAL LETTER BE
    63 |  00000426 | CYRILLIC CAPITAL LETTER TSE
    64 |  00000414 | CYRILLIC CAPITAL LETTER DE
    65 |  00000415 | CYRILLIC CAPITAL LETTER IE
    66 |  00000424 | CYRILLIC CAPITAL LETTER EF
    67 |  00000413 | CYRILLIC CAPITAL LETTER GHE
    68 |  00000425 | CYRILLIC CAPITAL LETTER HA
    69 |  00000418 | CYRILLIC CAPITAL LETTER I
    6A |  00000419 | CYRILLIC CAPITAL LETTER SHORT I
    6B |  0000041A | CYRILLIC CAPITAL LETTER KA
    6C |  0000041B | CYRILLIC CAPITAL LETTER EL
    6D |  0000041C | CYRILLIC CAPITAL LETTER EM
    6E |  0000041D | CYRILLIC CAPITAL LETTER EN
    6F |  0000041E | CYRILLIC CAPITAL LETTER O
    70 |  0000041F | CYRILLIC CAPITAL LETTER PE
    71 |  0000042F | CYRILLIC CAPITAL LETTER YA
    72 |  00000420 | CYRILLIC CAPITAL LETTER ER
    73 |  00000421 | CYRILLIC CAPITAL LETTER ES
    74 |  00000422 | CYRILLIC CAPITAL LETTER TE
    75 |  00000423 | CYRILLIC CAPITAL LETTER U
    76 |  00000416 | CYRILLIC CAPITAL LETTER ZHE
    77 |  00000412 | CYRILLIC CAPITAL LETTER VE
    78 |  0000042C | CYRILLIC CAPITAL LETTER SOFT SIGN
    79 |  0000042B | CYRILLIC CAPITAL LETTER YERU
    7A |  00000417 | CYRILLIC CAPITAL LETTER ZE
    7B |  00000428 | CYRILLIC CAPITAL LETTER SHA
    7C |  0000042D | CYRILLIC CAPITAL LETTER E
    7D |  00000429 | CYRILLIC CAPITAL LETTER SHCHA
    7E |  00000427 | CYRILLIC CAPITAL LETTER CHE
    7F |  0000007F | DELETE (DEL)

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