LINUX.ORG.RU

perl проблема с кодировкой на удаленном сервере (utf8, метод GET)


0

0

Апач для LWP::Simple отдает utf8:

[vilfred@observ vilfred]$ perl -MLWP::Simple -e 'print head ("http://www.hh.ru/";),"\n"'
text/html; charset=UTF-81187625588nginx/0.4.2
[vilfred@observ vilfred]$

но если сделать так:

perl -MLWP::Simple -e 'print get ("http://www.hh.ru/";),"\n"'

то в консоли показываются кракозябры. Как перекодировать, полгугла облазил - не пашет, собака...

p.s. локаль на tty такая:

LANG=en_US
LC_CTYPE="en_US"
LC_NUMERIC="en_US"
LC_TIME="en_US"
LC_COLLATE=C
LC_MONETARY="en_US"
LC_MESSAGES="en_US"
LC_PAPER="en_US"
LC_NAME="en_US"
LC_ADDRESS="en_US"
LC_TELEPHONE="en_US"
LC_MEASUREMENT="en_US"
LC_IDENTIFICATION="en_US"
LC_ALL=

☆☆

хочу перекодировать в koi8 или win1251, но оно упорно не перекодирется =(

use utf8;
...
printf(utf8::decode("utf8","$1"));

не помогает.

vilfred ☆☆
() автор топика
Ответ на: комментарий от kto_tama

не, это я чайник, надо было в путти кодировку настроить=)

vilfred ☆☆
() автор топика
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.