use utf8; use encoding 'utf8'; my $out = &refPrint(\%rows); ##

##

Now, it dies with an error, that encoding is deprecated

##

##

use utf8;

my $out = &refPrint(\%rows);

##

##

6 table_name reshenia
description Решения

1 description Структура таблиц базы данных
table_name db_structure_tables

3 table_name sotrudniki
description Сотрудники

2 description Структура полей в таблицах базы данных
table_name db_structure_fields

5 description Районы
table_name rayony

4 description Запросы
table_name zaprosy


####


	



Открывается База.
2 table_name db_structure_fields
description С�‚�€�ƒк�‚�ƒ�€а полей в �‚абли�†а�… баз�‹ данн�‹�…

5 table_name rayony
description � айон�‹

4 table_name zaprosy
description �—ап�€ос�‹

1 table_name db_structure_tables
description С�‚�€�ƒк�‚�ƒ�€а �‚абли�† баз�‹ данн�‹�…

3 description Со�‚�€�ƒдники
table_name sotrudniki

6 description � е�ˆения
table_name reshenia




####

use utf8;
use Encode;

my $out = decode('UTF-8', &refPrint(\%rows));