Доброе время суток. Такая проблема: 1. При попытке записи руского текста Perlом в Oracle в таблице получаем перекодированую в транслатиницу запись (Привет Всем --> pRIWET vSEM) , да да, именно со сменой регистра. 2. При попытке чтения Perlом русского текста из Oracle получаем "?????" ( Привет Всем --> ?????? ????). Английский текст и цифры зписываются и считывабтся нормально, без искажения.
Причем сам Perl с руским текстом работает нормально (тоесть обработка, запись в файл производится как надо). При считывание русского текста с Oracle под Windows с помощью Oracle SQL*Plus тоже все нормально....
Доп информация : текст в базе Oracle находится в кодировке cp-1251. Такое ощущение, что что то с DBI.....
use DBI; $dbh=DBI->connect("dbi:Oracle:host=$host1;sid=$sid1",$user1,$pass1) ;
$sth = $dbh->prepare("insert into IdBD values (3,'Привет Всем !!!')"); $sth->execute(); $sth = $dbh->prepare("select Name from IdBD "); $sth->execute(); while (( my $Name) =$sth-> fetchrow_array) { print $Name; } exit;
У кого есть идеи как можно заставить это все работать нормально??? Perl 5.00503 DBD-Oracle-1.12 RH 7.1