Ну и что теперь,
все мои программы на перл переписывать?
Впрочем, спасибо, я рано или поздно бы занялся таким же
перекодированием.
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@xxxxxxxxxxxxx mailing list =
Mail "unsubscribe apache-talk" to majordomo@xxxxxxxxxxxxx if you want to quit.
= Archive avaliable at http://www.lexa.ru/apache-talk =
"Russian Apache" includes software developed
by the Apache Group for use in the Apache HTTP server project
(http://www.apache.org/) See
Apache LICENSE.
Copyright (C) 1995-2001 The Apache Group. All rights reserved.
Copyright (C) 1996 Dm. Kryukov; Copyright (C)
1997-2009 Alex Tutubalin. Design (C) 1998 Max Smolev.