#!/usr/bin/perl
# iso2uni.pl -- Version 0.01 98.02.22 02:57
# Converts ISO-8859-7 to UTF-8
# Encodings: ftp://ftp.unicode.org/Public/MAPPINGS/ISO8859/8859-7.TXT
# Algorithm: http://www.talisman.org/utf8.html
# (c) 1998 Hellenic Resources Institute, Inc.

while(<>) {

s/\xCE/\xCE\x9E/g;	#	GREEK CAPITAL LETTER XI
s/\xC2/\xCE\x92/g;	#	GREEK CAPITAL LETTER BETA
s/\xCA/\xCE\x9A/g;	#	GREEK CAPITAL LETTER KAPPA
s/\xBC/\xCE\x8C/g;	#	GREEK CAPITAL LETTER OMICRON WITH TONOS
s/\xBD/\xC2\xBD/g;	#	VULGAR FRACTION ONE HALF
s/\xA0/\xC2\xA0/g;	#	NO-BREAK SPACE
s/\xA1/\xCA\xBD/g;	#	MODIFIER LETTER REVERSED COMMA
s/\xA2/\xCA\xBC/g;	#	MODIFIER LETTER APOSTROPHE
s/\xA3/\xC2\xA3/g;	#	POUND SIGN
s/\xA6/\xC2\xA6/g;	#	BROKEN BAR
s/\xA7/\xC2\xA7/g;	#	SECTION SIGN
s/\xA8/\xC2\xA8/g;	#	DIAERESIS
s/\xA9/\xC2\xA9/g;	#	COPYRIGHT SIGN
s/\xAB/\xC2\xAB/g;	#	LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
s/\xAC/\xC2\xAC/g;	#	NOT SIGN
s/\xAD/\xC2\xAD/g;	#	SOFT HYPHEN
s/\xB2/\xC2\xB2/g;	#	SUPERSCRIPT TWO
s/\xE2/\xCE\xB2/g;	#	GREEK SMALL LETTER BETA
s/\xAF/\xE2\x40\x55/g;	#	HORIZONTAL BAR
s/\xB0/\xC2\xB0/g;	#	DEGREE SIGN
s/\xB1/\xC2\xB1/g;	#	PLUS-MINUS SIGN
s/\xB3/\xC2\xB3/g;	#	SUPERSCRIPT THREE
s/\xB4/\xCE\x84/g;	#	GREEK TONOS
s/\xB5/\xCE\x85/g;	#	GREEK DIALYTIKA TONOS
s/\xB6/\xCE\x86/g;	#	GREEK CAPITAL LETTER ALPHA WITH TONOS
s/\xB7/\xC2\xB7/g;	#	MIDDLE DOT
s/\xB8/\xCE\x88/g;	#	GREEK CAPITAL LETTER EPSILON WITH TONOS
s/\xB9/\xCE\x89/g;	#	GREEK CAPITAL LETTER ETA WITH TONOS
s/\xBA/\xCE\x8A/g;	#	GREEK CAPITAL LETTER IOTA WITH TONOS
s/\xBB/\xC2\xBB/g;	#	RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
s/\xBE/\xCE\x8E/g;	#	GREEK CAPITAL LETTER UPSILON WITH TONOS
s/\xBF/\xCE\x8F/g;	#	GREEK CAPITAL LETTER OMEGA WITH TONOS
s/\xC0/\xCE\x90/g;	#	GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS
s/\xC1/\xCE\x91/g;	#	GREEK CAPITAL LETTER ALPHA
s/\xC3/\xCE\x93/g;	#	GREEK CAPITAL LETTER GAMMA
s/\xC4/\xCE\x94/g;	#	GREEK CAPITAL LETTER DELTA
s/\xC5/\xCE\x95/g;	#	GREEK CAPITAL LETTER EPSILON
s/\xC6/\xCE\x96/g;	#	GREEK CAPITAL LETTER ZETA
s/\xC7/\xCE\x97/g;	#	GREEK CAPITAL LETTER ETA
s/\xC8/\xCE\x98/g;	#	GREEK CAPITAL LETTER THETA
s/\xC9/\xCE\x99/g;	#	GREEK CAPITAL LETTER IOTA
s/\xCB/\xCE\x9B/g;	#	GREEK CAPITAL LETTER LAMDA
s/\xCC/\xCE\x9C/g;	#	GREEK CAPITAL LETTER MU
s/\xCD/\xCE\x9D/g;	#	GREEK CAPITAL LETTER NU
s/\xCF/\xCE\x9F/g;	#	GREEK CAPITAL LETTER OMICRON
s/\xD0/\xCE\xA0/g;	#	GREEK CAPITAL LETTER PI
s/\xD1/\xCE\xA1/g;	#	GREEK CAPITAL LETTER RHO
s/\xD3/\xCE\xA3/g;	#	GREEK CAPITAL LETTER SIGMA
s/\xD4/\xCE\xA4/g;	#	GREEK CAPITAL LETTER TAU
s/\xD5/\xCE\xA5/g;	#	GREEK CAPITAL LETTER UPSILON
s/\xD6/\xCE\xA6/g;	#	GREEK CAPITAL LETTER PHI
s/\xD7/\xCE\xA7/g;	#	GREEK CAPITAL LETTER CHI
s/\xD8/\xCE\xA8/g;	#	GREEK CAPITAL LETTER PSI
s/\xD9/\xCE\xA9/g;	#	GREEK CAPITAL LETTER OMEGA
s/\xDA/\xCE\xAA/g;	#	GREEK CAPITAL LETTER IOTA WITH DIALYTIKA
s/\xDB/\xCE\xAB/g;	#	GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA
s/\xDC/\xCE\xAC/g;	#	GREEK SMALL LETTER ALPHA WITH TONOS
s/\xDD/\xCE\xAD/g;	#	GREEK SMALL LETTER EPSILON WITH TONOS
s/\xDE/\xCE\xAE/g;	#	GREEK SMALL LETTER ETA WITH TONOS
s/\xDF/\xCE\xAF/g;	#	GREEK SMALL LETTER IOTA WITH TONOS
s/\xE0/\xCE\xB0/g;	#	GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS
s/\xE1/\xCE\xB1/g;	#	GREEK SMALL LETTER ALPHA
s/\xE3/\xCE\xB3/g;	#	GREEK SMALL LETTER GAMMA
s/\xE4/\xCE\xB4/g;	#	GREEK SMALL LETTER DELTA
s/\xE5/\xCE\xB5/g;	#	GREEK SMALL LETTER EPSILON
s/\xE6/\xCE\xB6/g;	#	GREEK SMALL LETTER ZETA
s/\xE7/\xCE\xB7/g;	#	GREEK SMALL LETTER ETA
s/\xE8/\xCE\xB8/g;	#	GREEK SMALL LETTER THETA
s/\xE9/\xCE\xB9/g;	#	GREEK SMALL LETTER IOTA
s/\xEA/\xCE\xBA/g;	#	GREEK SMALL LETTER KAPPA
s/\xEB/\xCE\xBB/g;	#	GREEK SMALL LETTER LAMDA
s/\xEC/\xCE\xBC/g;	#	GREEK SMALL LETTER MU
s/\xED/\xCE\xBD/g;	#	GREEK SMALL LETTER NU
s/\xEE/\xCE\xBE/g;	#	GREEK SMALL LETTER XI
s/\xEF/\xCE\xBF/g;	#	GREEK SMALL LETTER OMICRON
s/\xF0/\xCF\xC0/g;	#	GREEK SMALL LETTER PI
s/\xF1/\xCF\xC1/g;	#	GREEK SMALL LETTER RHO
s/\xF2/\xCF\xC2/g;	#	GREEK SMALL LETTER FINAL SIGMA
s/\xF3/\xCF\xC3/g;	#	GREEK SMALL LETTER SIGMA
s/\xF4/\xCF\xC4/g;	#	GREEK SMALL LETTER TAU
s/\xF5/\xCF\xC5/g;	#	GREEK SMALL LETTER UPSILON
s/\xF6/\xCF\xC6/g;	#	GREEK SMALL LETTER PHI
s/\xF7/\xCF\xC7/g;	#	GREEK SMALL LETTER CHI
s/\xF8/\xCF\xC8/g;	#	GREEK SMALL LETTER PSI
s/\xF9/\xCF\xC9/g;	#	GREEK SMALL LETTER OMEGA
s/\xFA/\xCF\xCA/g;	#	GREEK SMALL LETTER IOTA WITH DIALYTIKA
s/\xFB/\xCF\xCB/g;	#	GREEK SMALL LETTER UPSILON WITH DIALYTIKA
s/\xFC/\xCF\xCC/g;	#	GREEK SMALL LETTER OMICRON WITH TONOS
s/\xFD/\xCF\xCD/g;	#	GREEK SMALL LETTER UPSILON WITH TONOS
s/\xFE/\xCF\xCE/g;	#	GREEK SMALL LETTER OMEGA WITH TONOS

    print;
}
