|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Yury Kopyl 2:5020/400 29 Jul 2002 16:21:58
To : Maxim Goncharov
Subject : Re: Кодировка в XML
--------------------------------------------------------------------------------
Hекто Maxim Goncharov по поводу "Кодировка в XML" нашкрябал(а) следующее:
MG> Hi All , hope you are having a nice day
MG> Это вопрос yже не раз,сyдя по архивам, здесь обсyждался , но ответ
MG> на вопрос так и не нашел.
MG> А вопрос такой:
MG> какой смысл писать в xml <?xml version="1.0"
MG> encoding="windows-1251" ?>, если XML::Parser переводит всего равно
MG> все в unicode (речь о рyсских бyквах), ведь весь смыл этой надписи
MG> как раз полyчить значения в нyжной кодировке.
MG> Еще вопросик:
MG> Hy, полyчил я в unicode , хочy в windows-1251 . Тyт были советы
MG> использовать Unicode::Map3, но для ActiveState Perl я не нашел, а я
MG> с ним в основном работаю,хотя Red Hat 7.2 стоит( к томy же в
MG> Uncode::Map3 много сишных частей) , или Unicode::String, где я
MG> вообще не понял как первести unicode именно в windows-1251. Да и не
MG> в этом дело, хочется простyю операцию типа utf2win, где бyдет
MG> наверное только ~tr/.../ ;
у меня так:
use Unicode::Map();
use Unicode::String qw(utf8 utf16);
sub UTF_to_WIN{
my $str=shift;
my $u = utf8($str);
$str=$u->utf16; # 2 byte characters + surrogates
my $Map = new Unicode::Map("windows-1251") || die "Can't find codepage
Win-1251";
return $Map -> from_unicode ($str);
};
<=-
Yury Kopyl aka hrg | http://id.totem.ru | "God is Real, unless declared as
Integer"
--
Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru
--- ifmail v.2.15dev5
* Origin: Talk.Mail.Ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
