В программе на PERL читаю данные из БД Oracle через DBI.
Все данные в кодировке UTF.
Далее использую модуль Switch и пишу что-то вроде этого:
switch($utf_str)
{
}
На что получаю ошибки
Malformed UTF-8 character (unexpected non-continuation byte 0xc5, immediately after start byte 0xcb) in bitwise and (&) at /usr/local/lib/perl5/5.8.2/Switch.pm line 256, <CFG> line 30.
Вот проблемный кусочек Switch.pm:
....
....
sub switch(;$)
{
my ($s_val) = @_ ? $_[0] : $_;
my $s_ref = ref $s_val;
if ($s_ref eq 'CODE') # Line 256
{
.....
.....
Знает кто-нибудь как с этим бороться???
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.
Похожие темы
- Форум utf8 в логах, что бы сие значило? (2004)
- Форум perl + utf: консоль против Qt (2007)
- Форум perl UTF-8 (2008)
- Форум Perl, LWP, UTF-8 (2006)
- Форум perl, mysql и utf-8 (2008)