|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Sergey Aleshin 2:5020/400 12 Jul 2002 17:53:29
To : All
Subject : Проблемы с Perl
--------------------------------------------------------------------------------
Привет All!
Тут, похоже, проблемы с перлом во freebsd 4.6.
Имеем такую программу:
use POSIX qw(locale_h);
setlocale(LC_ALL,'ru_RU.KOI8-R');
use locale;
my $koeff=-10;
my $a=(100.0+$koeff)/100.0;
print "a=$a\n";
Hа FREEBSD 4.5-RELEASE:
0.9
Hа FREEBSD 4.6-RELEASE-P1
0,9!!!!
У меня такое поведение на 4.6 ведет к тому, что не работает вставка в БД:
Пусть дана след. программа:
my $sth=$dbh->prepare('insert into table values(?,?,?)');
$sth->execute($v1,$v2,$v3);
Так вот из-за запятой в $v1,$v2 или $v3 получаем ошибку несоответствия кол-ва
аргументов и полей БД.
Отсюда вопрос: ЧТО ДЕЛАТЬ??? :-) Hа самом деле, достаточно, видимо,
вернуть денежный разделитель в локали в старое значение, в '.'
Кто знает, как это сделать?
--
Sergey Aleshin
--- ifmail v.2.15dev5
* Origin: RCD News Server (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
