if [ -r /etc/sysconfig/i18n ]
then 
perl -e '$^I="";
while (<>)
{
    if ($_=~m/SYSFONT *=/) {
	print "SYSFONT=UniCyr_8x16\n";
    } elsif ($_=~m/SYSFONTACM *=/) {
	print "SYSFONTACM=cp1251.acm\n";
    } elsif ($_=~m/LC_CTYPE *=/) {
	print "LC_CTYPE=ru_RU.CP1251\n";
    } elsif ($_=~m/LC_COLLATE *=/) {
	print "LC_COLLATE=ru_RU.CP1251\n";
    } else {
	print $_;
    };
}' /etc/sysconfig/i18n
else
    echo "SYSFONT=UniCyr_8x16\nSYSFONTACM=koi8-r.acm\nLANG=en_US\nLC_COLLATE=ru_RU.CP1251\nLC_CTYPE=ru_RU.CP1251\n" > /etc/sysconfig/i18n
fi
