Main   Changelog   Spec   Patches   Sources   Download   Gear   Bugs e FR  Repocop 

#!/bin/sh
# *koi8-r*
# ðÒÅÏÂÒÁÚÏ×ÁÔÅÌØ ÆÁÊÌÏ× gnucash ÉÚ ÓÔÁÒÏÇÏ ÆÏÒÍÁÔÁ
#
# õËÁÖÉÔÅ × ÐÁÒÁÍÅÔÒÁÈ ÆÁÊÌÙ, ËÏÔÏÒÙÅ
# ÎÕÖÎÏ ÐÒÅÏÂÒÁÚÏ×ÁÔØ Ë ÎÏ×ÏÍÕ ÆÏÒÍÁÔÕ.
# ë ÓÏÖÁÌÅÎÉÀ, ÐÒÏÂÅÌÙ × ÎÁÚ×ÁÎÉÑÈ ÎÅ ÐÏÄÄÅÒÖÉ×ÁÀÔÓÑ
# ÷îéíáîéå! éÓÈÏÄÎÙÅ ÆÁÊÌÙ ÂÕÄÕÔ ÐÅÒÅÚÁÐÉÓÁÎÙ,
# ËÏÐÉÉ ÓÏÈÒÁÎÅÎÙ × *~

# (c) 2002-2003, 2006 Vitaly Lipatov <lav@altlinux.ru>

DEFCHARSET=`locale charmap`

for i in "${@}"
do
	echo "Converting $i"
	cp -f "${i}" "${i}~"
	cat "$i~" | \
		perl -pi -e 's/&#([0-9]{3});/chr(sprintf("%d",$1))/eg' |\
		iconv -f $DEFCHARSET -t utf-8 | cat >"$i"
done