[Comm] Perl bug in Compact?

[Andrey Brindeew]

Hi!

$ perl  -e "use utf8; /\x{100}/i;"
Use of uninitialized value in pattern match (m//) at
/usr/lib/perl5/utf8_heavy.pl line 185.
Use of uninitialized value in scalar assignment at
/usr/lib/perl5/utf8_heavy.pl line 201.
Use of uninitialized value in pattern match (m//) at
/usr/lib/perl5/utf8_heavy.pl line 202.
Use of uninitialized value in scalar assignment at
/usr/lib/perl5/utf8_heavy.pl line 259.
Use of uninitialized value in pattern match (m//) at
/usr/lib/perl5/utf8_heavy.pl line 262.
Use of uninitialized value in scalar assignment at
/usr/lib/perl5/utf8_heavy.pl line 317.
Use of uninitialized value in pattern match (m//) at
/usr/lib/perl5/utf8_heavy.pl line 318.
panic: swash_fetch at -e line 1.
[Срд Июн 23 17:28:35][mon-www на centavr.dmz.off : ~/apache/logs]
$ rpm -q perl-base
perl-base-5.8.2-alt1

$ perl  -e "use utf8; /\x{100}/i;"
[Wed Jun 23 17:29:30][abr на srv.rian.ru : ~]
$ rpm -q perl-base
perl-base-5.8.0-alt1

$ perl  -e "use utf8; /\x{100}/i;"
(2) [Срд Июн 23 17:29:51][abr на abr.rian.off : ~]
$ rpm -q perl-base
perl-base-5.8.4-alt1

Как это лечить?

-- 
WBR, Andrey Brindeew.
"No one person can understand Perl culture completely"
(C) Larry Wall.
----------- следующая часть -----------
Было удалено вложение не в текстовом формате...
Имя     : =?iso-8859-1?q?=CF=D4=D3=D5=D4=D3=D4=D7=D5=C5=D4?=
Тип     : application/pgp-signature
Размер  : 245 байтов
Описание: =?iso-8859-1?q?=CF=D4=D3=D5=D4=D3=D4=D7=D5=C5=D4?=
Url     : <http://lists.altlinux.org/pipermail/community/attachments/20040623/3baef437/attachment-0003.bin>