LINUX.ORG.RU

Perl модуль Encode. Как?


0

0

Вот есть такой перл скрипт:
#!/usr/bin/perl -w
use encoding ':locale';
use Encode;
use CGI qw/:standard/;
print header('text/plain');
open(F, ">./ENC_TEST.TXT");
print F encode('koi8-r', param('subject'));
close(F);

Вызываем его из консоли:
> perl enc_test.pl subject='Привет мир!'
Content-Type: text/plain; charset=ISO-8859-1

Сохраняется файл, который действительно в кодировке KOI8-R.

Начинаю вызывать из браузера:
http://127.0.0.1/cgi-bin/enc_test.pl?subject=%D0%9F%D1%80%D0%B8%D0%B2%D0%B5%D1% 82%20%D0%BC%D0%B8%D1%80!!!

Сохраняется файл, но уже кодировка испорчена. Там одни ?????...

Почему? Как исправить?

Re: Perl модуль Encode. Как?

Веб-сервер lighttpd. В его конфигах во всех упоминаниях о кодировке написано UTF-8. Моя локаль тоже UTF-8

anterior ()
Ответ на: Re: Perl модуль Encode. Как? от anterior

Re: Perl модуль Encode. Как?

если нашел , то сообши что за ошибка , может кому-нибудь понадобится .

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