Re: [apache-talk] Re: [apache-rus] UTF-8

[Oleg Broytmann <phd@sun.med.ru>]

Ну и что теперь,

   все мои программы на перл переписывать?

   Впрочем, спасибо, я рано или поздно бы занялся таким же
перекодированием.

On Thu, 16 Sep 1999, Victor Wagner wrote:
> Избавиться, как видим, не получается. Остается  корректно обработать.
> 
> У Андреева в скрипте, который он вроде даже отлаживал с utf8-страничками,
> это выглядит вот так: 
> 
> # Pointers to persistent objects from Unicode::String and Unicode::Map8
> $::map = '';
> $::str = '';
> 
> sub utf2koi
> {
> 
>     if (!$ICE::Cp::map or !$ICE::Cp::str) {
>         # need to init the Unicode objects
>         require Unicode::Map8;
>         require Unicode::String;
> 
>         $::map = Unicode::Map8->new("koi8-r") ||
>             die "Can not loadkoi8 map table";
>         $::str = Unicode::String->utf8()      ||
>              die "Can not init unicode string";
>     }
> 
>     $::str->utf8($_[0]);
>     $_[0] = $::map->to8( $::str->utf16 );
> 
> }
> 
> 
> Скрипт выполняется с CharsetRecodeMultipartForm Off, а форма была
> именно multipart. 

Oleg.
---- 
    Oleg Broytmann  National Research Surgery Centre  http://sun.med.ru/~phd/
           Programmers don't die, they just GOSUB without RETURN.

=============================================================================
=               Apache-Talk@lists.lexa.ru mailing list                      =
Mail "unsubscribe apache-talk" to majordomo@lists.lexa.ru if you want to quit.
=       Archive avaliable at http://www.lexa.ru/apache-talk                 =