|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Artem Chuprina 2:5020/400 30 Jan 2008 20:47:05 To : Dmitry E. Oboukhov Subject : Re: и снова о юникоде -------------------------------------------------------------------------------- Dmitry E. Oboukhov -> Alexey Bavykin @ Wed, 30 Jan 2008 19:07:39 +0300: DEO> разобрался AB>> Можно сделать так: AB>> # Тут у тебя $content будет с зажженным флагом. AB>> $content = decode('koi8-r', $content, Encode::FB_QUIET); DEO> нет тут дело оказалось не в флагах а в том что юникод на вебстраницах DEO> передается не в utf-8, а в utf-16LE DEO> в итоге регвыражение получилось такое: DEO> use Encode qw(encode decode); DEO> ... DEO> $str=~s/\&\#(\d{4})\;/encode('utf-8', decode('utf-16LE', pack('S', DEO> $1)))/eg; Это на каких веб-страницах он так передается!? -- Artem Chuprina RFC2822: <ran{}ran.pp.ru> Jabber: ran@jabber.ran.pp.ru А вы поподробнее, поподробнее. А заодно и быстрее будет... --- ifmail v.2.15dev5.4 * Origin: Leninsky 45 home network (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/53297bb28fdd4.html, оценка из 5, голосов 10
|