Перепробовал все варианты. Полазив по сайтам показалось что у Перла проблемы с utf-8. Для этого есть какие-то "прагмы".
Убрал это :
Код:
use locale;
use POSIX qw(locale_h);
setlocale(LC_CTYPE,"ru_RU.UTF-8");
Поставил это:
Код:
use utf8;
Хотя есть еще один вариант:
Код:
use encoding 'cp1251', STDOUT => 'koi8-r';
P.S. Вроде работает
