Модераторы: korob2001, ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Перекодировка 
:(
    Опции темы
worsvch
Дата 13.3.2014, 13:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 139
Регистрация: 23.4.2009

Репутация: нет
Всего: нет



ОС: windows
Есть файл в кодировке UCS-2BE, как можно его перекодировать чтобы в командной строке нормально отображался русский текст?
Пробовал encoding, выводит кракозябры 
PM MAIL   Вверх
reiserford
Дата 13.3.2014, 13:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Awaiting Authorisation
Сообщений: 22
Регистрация: 20.3.2012

Репутация: 1
Всего: 1



Код

use common::sense;
use Encode;
say Encode::encode("cp1251", Encode::decode("UCS-2BE", $ucs2));

а так?
PM   Вверх
worsvch
Дата 13.3.2014, 14:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 139
Регистрация: 23.4.2009

Репутация: нет
Всего: нет



Цитата(reiserford @ 13.3.2014,  13:36)
Код

use common::sense;
use Encode;
say Encode::encode("cp1251", Encode::decode("UCS-2BE", $ucs2));

а так?

Так частично, большинство символов нормально, но некоторые буквы отображаются неккоректно, например У отображается как # 
PM MAIL   Вверх
arto
Дата 14.3.2014, 09:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1495
Регистрация: 31.10.2004

Репутация: 38
Всего: 40



GET http://az.lib.ru/t/tolstoj_lew_nikolaewich/text_0040.shtml | iconv -f cp1251 -t UCS-2BE -c | perl -lpe 'BEGIN{binmode STDIN, ":encoding(UCS-2BE)"; binmode STDOUT, ":encoding(koi8-r)"}' ошибок не показывает.
Может строка неправильная?

PM MAIL ICQ   Вверх
worsvch
Дата 22.3.2014, 10:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 139
Регистрация: 23.4.2009

Репутация: нет
Всего: нет



Цитата(arto @ 14.3.2014,  09:50)
GET http://az.lib.ru/t/tolstoj_lew_nikolaewich/text_0040.shtml | iconv -f cp1251 -t UCS-2BE -c | perl -lpe 'BEGIN{binmode STDIN, ":encoding(UCS-2BE)"; binmode STDOUT, ":encoding(koi8-r)"}' ошибок не показывает.
Может строка неправильная?

iconv - это, например, linux, но не windows. Текстовые файлы все в windows
PM MAIL   Вверх
shamber
Дата 22.3.2014, 10:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1422
Регистрация: 5.9.2006
Где: Россия

Репутация: 17
Всего: 18



Цитата(worsvch @ 22.3.2014,  10:05)
iconv - это, например, linux, но не windows. 

o rly?
PM MAIL Jabber   Вверх
worsvch
Дата 22.3.2014, 10:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 139
Регистрация: 23.4.2009

Репутация: нет
Всего: нет



Цитата(shamber @ 22.3.2014,  10:13)
Цитата(worsvch @ 22.3.2014,  10:05)
iconv - это, например, linux, но не windows. 

o rly?

Действительно есть, извиняюсь.
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl"
korob2001
sharq
  • В этом разделе обсуждаются общие вопросы по языку Perl
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0669 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.