perl, oracle a desetinna carka/tecka?

[Michal Dobes]

	Zdravim,

	nejak se snazim prijit na to, jak presvedcit Oracle, ze chci
cisla vracet/zadavat s desetinnou teckou a nikoliv carkou.
Netusite nekdo jak na to?
Neco takovedleho zkolabuje na chybny format cisla:
use DBD::Oracle qw(:ora_types);
$db = DBI->connect( "DBI:Oracle:host=XXX;sid=XXX","XXX", "XXX",
{AutoCommit=>1})
        or die "smolik ";
$iv = $db->do("CREATE TABLE mypok (cislo NUMBER)");
$iv = $db->prepare("INSERT INTO mypok (cislo) VALUES(:cislo)");
$iv->bind_param(":cislo", 11.5, ORA_NUMBER);
$iv->execute();

pokud se pouzije
$iv = $db->do("INSERT INTO mypok (cislo) VALUES(10.5)");
tak to kupodivu projde dobre, ale timhle zpusobem je to trosku
neprakticke pro vetsi mnozstvi dat.
V opacnem smeru by bylo tak ehezke se tech carek zbavit.
Pritom se mi zrovna nechce profil prenastavovat z Ceska na neco
jineho. :-)

	Majkl