[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 at 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 at 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 at 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.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 245 bytes
Desc: not available
Url : http://lists.altlinux.ru/pipermail/community/attachments/20040623/3baef437/attachment.bin