From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <at@altlinux.ru>
Date: Sat, 12 Apr 2008 21:17:49 +0400
From: Alexey Tourbin <at@altlinux.ru>
To: sisyphus@lists.altlinux.org
Message-ID: <20080412171749.GA13411@solemn.turbinal>
Mail-Followup-To: sisyphus@lists.altlinux.org
References: <200804111340.47797.boris@office.etersoft.ru>
Mime-Version: 1.0
Content-Type: multipart/signed; micalg=pgp-sha1;
	protocol="application/pgp-signature"; boundary="xHFwDpU9dbj6ez1V"
Content-Disposition: inline
In-Reply-To: <200804111340.47797.boris@office.etersoft.ru>
Subject: Re: [sisyphus] =?koi8-r?b?cGVybCDJIHVuaWNvZGU=?=
X-BeenThere: sisyphus@lists.altlinux.org
X-Mailman-Version: 2.1.10b3
Precedence: list
Reply-To: ALT Linux Sisyphus discussions <sisyphus@lists.altlinux.org>
List-Id: ALT Linux Sisyphus discussions <sisyphus.lists.altlinux.org>
List-Unsubscribe: <https://lists.altlinux.org/mailman/listinfo/sisyphus>,
	<mailto:sisyphus-request@lists.altlinux.org?subject=unsubscribe>
List-Archive: <http://lists.altlinux.org/pipermail/sisyphus>
List-Post: <mailto:sisyphus@lists.altlinux.org>
List-Help: <mailto:sisyphus-request@lists.altlinux.org?subject=help>
List-Subscribe: <https://lists.altlinux.org/mailman/listinfo/sisyphus>,
	<mailto:sisyphus-request@lists.altlinux.org?subject=subscribe>
X-List-Received-Date: Sat, 12 Apr 2008 17:17:49 -0000
Archived-At: <http://lore.altlinux.org/sisyphus/20080412171749.GA13411@solemn.turbinal/>
List-Archive: <http://lore.altlinux.org/sisyphus/>
List-Post: <mailto:sisyphus@altlinux.ru>


--xHFwDpU9dbj6ez1V
Content-Type: text/plain; charset=koi8-r
Content-Disposition: inline
Content-Transfer-Encoding: quoted-printable

On Fri, Apr 11, 2008 at 01:40:47PM +0400, Boris Savelev wrote:
> =FA=C4=D2=C1=D7=D3=D4=D7=D5=CA=D4=C5!
> =F3=D4=CF=CC=CB=CE=D5=CC=D3=D1 =D3 =D0=D2=CF=C2=CC=C5=CD=CF=CA =C9=D3=D0=
=CF=CC=D8=DA=CF=D7=C1=CE=C9=D1 =C0=CE=C9=CB=CF=C4=C1 =D7 =D0=C5=D2=CC=C5, =
=C1 =C9=CD=C5=CE=CE=CF (cgi =D4=C5=D3=D4)
> #!/usr/bin/perl -W
> use strict;
> print "Content-type: text/plain; charset=3DUTF-8\n\n";
> my $text;
> my $text_lc;
> $text=3D"=E2=EF=EC=F8=FB=EF=EA!=CD=C1=CC=C5=CE=D8=CB=C9=CA!small!BIG!";
> $text_lc=3Dlc($text);
> print "Env 'PERL_UNICODE' is ";
> print ${^UNICODE};
> print "\n";
> print "Run test: \n";
> print "Source text\n";
> print $text;
> print "\n";
> print "Text after LowerCase\n";
> print $text_lc;
>=20
> =F4=C5=CB=D3=D4 =CE=C1=D0=C9=D3=C1=CE =D7 UTF8.
> =F7 =D4=C1=CB=CF=CD =D7=C9=C4=C5 =D4=C5=D3=D4 =CE=C5 =D0=D2=CF=C8=CF=C4=
=C9=D4, =D4.=C5. =C2=CF=CC=D8=DB=C9=C5 =D2=D5=D3=D3=CB=C9=C5 =D3=C9=CD=D7=
=CF=CC=D9 =CD=C1=CC=C5=CE=D8=CB=C9=CD=C9 =CE=C5=20
> =D3=D4=C1=CE=CF=D7=D1=D4=D3=D1, =C8=CF=D4=D1 =D3 =CC=C1=D4=C9=CE=D3=CB=C9=
=CD=C9 =D7=D3=C5 =D0=D2=C5=CB=D2=C1=D3=CE=CF.
> =E4=C1=CC=C5=C5 =C5=D3=CC=C9 =D7 =CE=C1=DE=C1=CC=C5 =C4=CF=C2=C1=D7=C9=D4=
=D8:
> use utf8;
> =D4=CF =D4=C5=D3=D4 =CF=D4=D2=C1=C2=C1=D4=D9=D7=C1=C5=D4=D3=D1, =CE=CF:
> Starting from Perl 5.8.0, the use of use utf8  is no longer necessary
> (http://perldoc.perl.org/perluniintro.html)

use utf8 =D7 =C4=C1=CE=CE=CF=CD =D3=CC=D5=DE=C1=C5 =CE=D5=D6=C5=CE, =D0=D2=
=CF=DE=C9=D4=C1=CA=D4=C5 'perldoc utf8'.

--xHFwDpU9dbj6ez1V
Content-Type: application/pgp-signature
Content-Disposition: inline

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.9 (GNU/Linux)

iEYEARECAAYFAkgA7r0ACgkQfBKgtDjnu0Zp3gCgqJRM06IIqX+NRmBr65+JSkTu
vPQAnR/HjB3j9GITr6acRYTf3/V50YqH
=4gWk
-----END PGP SIGNATURE-----

--xHFwDpU9dbj6ez1V--