37 lines
1.7 KiB
Perl
37 lines
1.7 KiB
Perl
|
#------------------------------------------------------------------------------
|
||
|
|
# File: Latin2.pm
|
||
|
|
#
|
||
|
|
# Description: cp1250 to Unicode
|
||
|
|
#
|
||
|
|
# Revisions: 2010/01/20 - P. Harvey created
|
||
|
|
#
|
||
|
|
# References: 1) http://unicode.org/Public/MAPPINGS/VENDORS/MICSFT/WINDOWS/CP1250.TXT
|
||
|
|
#
|
||
|
|
# Notes: The table omits 1-byte characters with the same values as Unicode
|
||
|
|
#------------------------------------------------------------------------------
|
||
|
|
use strict;
|
||
|
|
|
||
|
|
%Image::ExifTool::Charset::Latin2 = (
|
||
|
|
0x80 => 0x20ac, 0x82 => 0x201a, 0x84 => 0x201e, 0x85 => 0x2026,
|
||
|
|
0x86 => 0x2020, 0x87 => 0x2021, 0x89 => 0x2030, 0x8a => 0x0160,
|
||
|
|
0x8b => 0x2039, 0x8c => 0x015a, 0x8d => 0x0164, 0x8e => 0x017d,
|
||
|
|
0x8f => 0x0179, 0x91 => 0x2018, 0x92 => 0x2019, 0x93 => 0x201c,
|
||
|
|
0x94 => 0x201d, 0x95 => 0x2022, 0x96 => 0x2013, 0x97 => 0x2014,
|
||
|
|
0x99 => 0x2122, 0x9a => 0x0161, 0x9b => 0x203a, 0x9c => 0x015b,
|
||
|
|
0x9d => 0x0165, 0x9e => 0x017e, 0x9f => 0x017a, 0xa1 => 0x02c7,
|
||
|
|
0xa2 => 0x02d8, 0xa3 => 0x0141, 0xa5 => 0x0104, 0xaa => 0x015e,
|
||
|
|
0xaf => 0x017b, 0xb2 => 0x02db, 0xb3 => 0x0142, 0xb9 => 0x0105,
|
||
|
|
0xba => 0x015f, 0xbc => 0x013d, 0xbd => 0x02dd, 0xbe => 0x013e,
|
||
|
|
0xbf => 0x017c, 0xc0 => 0x0154, 0xc3 => 0x0102, 0xc5 => 0x0139,
|
||
|
|
0xc6 => 0x0106, 0xc8 => 0x010c, 0xca => 0x0118, 0xcc => 0x011a,
|
||
|
|
0xcf => 0x010e, 0xd0 => 0x0110, 0xd1 => 0x0143, 0xd2 => 0x0147,
|
||
|
|
0xd5 => 0x0150, 0xd8 => 0x0158, 0xd9 => 0x016e, 0xdb => 0x0170,
|
||
|
|
0xde => 0x0162, 0xe0 => 0x0155, 0xe3 => 0x0103, 0xe5 => 0x013a,
|
||
|
|
0xe6 => 0x0107, 0xe8 => 0x010d, 0xea => 0x0119, 0xec => 0x011b,
|
||
|
|
0xef => 0x010f, 0xf0 => 0x0111, 0xf1 => 0x0144, 0xf2 => 0x0148,
|
||
|
|
0xf5 => 0x0151, 0xf8 => 0x0159, 0xf9 => 0x016f, 0xfb => 0x0171,
|
||
|
|
0xfe => 0x0163, 0xff => 0x02d9,
|
||
|
|
);
|
||
|
|
|
||
|
|
1; # end
|