UTF-8 issues connecting to Oracle

UTF-8 issues connecting to Oracle

am 29.01.2008 00:02:17 von mmuratet

Greetings

I am using perl 5.8.0 on RedHat ES 3. I got DBD::Oracle-1.19 to build
and pass the tests after we worked out the kinks from a recent move to
a new network. I am and have been in the process of trying to get some
legacy software to run.

When I first tried to run the script it barfed on a statement "use
constant UNIX => 0' with a message 'Constant name 'UNIX' has unknown
problems...'. A Google search turned up a known problem with perl on
ES 3 and the UTF8 character set. I set LANG=en_US and the script ran
without a error message but produced no output. The DBI-
>connect('dbi:Oracle:', 'user/****@dbname', '') || die 'DBI-
>errstr....' didn't die so I'm assuming it connected OK.

I set the LANG='utf8' again and now I'm seeing:

perl: warning: Setting locale failed.
perl: warning: Please check that your locale settings:
LANGUAGE = "utf8",
LC_ALL = "utf8",
LANG = "utf8"
are supported and installed on your system.
perl: warning: Falling back to the standard locale ("C").


More Google searches recommended upgrading perl but it occurred to me--
all of the tests pass. I see in the /t subdirectory there's a good bit
of code dealing with UTF8. So, if the tests work it must be possible
to get the legacy scripts to work.

It's maybe more of an Oracle question than one of DBI/DBD, but could a
character set problem lead to silent failures?

Can someone help me interpret the trace below?

Thanks

Mike

DBI 1.59-ithread default trace level set to 0x0/2 (pid 26582) at
incremental_plates.pl line 52
-> DBI->connect(dbi:Oracle:, prod/xxxxx@image, ****)
-> DBI->install_driver(Oracle) for linux perl=5.008 pid=26582
ruid=0 euid=0
install_driver: DBD::Oracle version 1.19 loaded from /usr/
lib64/perl5/site_perl/5.8.0/DBD/Oracle.pm
-> STORE in DBD::_::common for DBD::Oracle::dr
(DBI::dr=HASH(0xb8e010)~0xb8e070 'ShowErrorStatement' 1) thr#504010
<- STORE= 1 at Oracle.pm line 61
<- install_driver= DBI::dr=HASH(0xb8e010)
-> connect for DBD::Oracle::dr (DBI::dr=HASH(0xb8e010)~0xb8e070
'' 'prod/xxxxx@image' **** HASH(0x66f4c0)) thr#504010
<- connect= DBI::db=HASH(0xb91f10) at DBI.pm line 638
-> STORE for DBD::Oracle::db (DBI::db=HASH(0xb91e70)~INNER
'PrintError' 1) thr#504010
<- STORE= 1 at DBI.pm line 690
-> STORE for DBD::Oracle::db (DBI::db=HASH(0xb91e70)~INNER
'AutoCommit' 1) thr#504010
<- STORE= 1 at DBI.pm line 690
-> STORE for DBD::Oracle::db (DBI::db=HASH(0xb91e70)~INNER
'Username' 'prod/xxxxxxx@image') thr#504010
<- STORE= 1 at DBI.pm line 693
<> FETCH= 'prod/xxxxxxxx@image' ('Username' from cache) at DBI.pm
line 693
-> connected in DBD::_::db for DBD::Oracle::db
(DBI::db=HASH(0xb91f10)~0xb91e70 'dbi:Oracle:' 'prod/@image' '')
thr#504010
<- connected= undef at DBI.pm line 699
<- connect= DBI::db=HASH(0xb91f10)
-> STORE for DBD::Oracle::db (DBI::db=HASH(0xb91e70)~INNER
'dbi_connect_closure' CODE(0xb8f200)) thr#504010
<- STORE= 1 at DBI.pm line 708
-> selectcol_arrayref in DBD::_::db for DBD::Oracle::db
(DBI::db=HASH(0xb91f10)~0xb91e70 'select collection_name from
clone_collection') thr#504010
1 -> prepare for DBD::Oracle::db (DBI::db=HASH(0xb91e70)~INNER
'select collection_name from clone_collection' undef) thr#504010
fbh 1: 'COLLECTION_NAME' NO null , otype 1-> 5, dbsize 10/11,
p10.s0
1 <- prepare= DBI::st=HASH(0xb921c0) at DBI.pm line 1618
-> execute for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
dbd_st_execute SELECT (out0, lob0)...
dbd_st_execute SELECT returned (SUCCESS, rpc0, fn4, out0)
<- execute= '0E0' at DBI.pm line 1620
-> bind_col in DBD::_::st for DBD::Oracle::st
(DBI::st=HASH(0xb921c0)~0xb92170 1 SCALAR(0xb92160)) thr#504010
<- bind_col= 1 at DBI.pm line 1625
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBY' ] row1 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCB' ] row2 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCC' ] row3 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCD' ] row4 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRQA' ] row5 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRQC' ] row6 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCE' ] row7 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCG' ] row8 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCH' ] row9 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'OCAA' ] row10 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCK' ] row11 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCL' ] row12 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCN' ] row13 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRQL' ] row14 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRQM' ] row15 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRQN' ] row16 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCS' ] row17 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCT' ] row18 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRDP' ] row19 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'OCAE' ] row20 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBW' ] row21 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBC' ] row22 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCJ' ] row23 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'DMAA' ] row24 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCP' ] row25 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRQK' ] row26 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCV' ] row27 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCW' ] row28 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBX' ] row29 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCF' ] row30 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCI' ] row31 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'DMAB' ] row32 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCR' ] row33 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCU' ] row34 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBZ' ] row35 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'OCAB' ] row36 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCM' ] row37 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCO' ] row38 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'OCAC' ] row39 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCQ' ] row40 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'OCAD' ] row41 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCX' ] row42 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'LLAM' ] row43 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'LLAS' ] row44 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAA' ] row45 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAB' ] row46 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAC' ] row47 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'LLCM' ] row48 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAD' ] row49 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAE' ] row50 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAF' ] row51 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAG' ] row52 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAH' ] row53 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAI' ] row54 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAJ' ] row55 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAK' ] row56 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAL' ] row57 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAM' ] row58 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'LLKM' ] row59 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAN' ] row60 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAO' ] row61 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAP' ] row62 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAT' ] row63 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAU' ] row64 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAV' ] row65 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAX' ] row66 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAY' ] row67 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAZ' ] row68 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBA' ] row69 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBB' ] row70 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBD' ] row71 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBE' ] row72 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBG' ] row73 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBH' ] row74 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'NDAM' ] row75 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'NDCM' ] row76 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'NDKM' ] row77 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'NDKO' ] row78 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBL' ] row79 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBQ' ] row80 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBK' ] row81 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBM' ] row82 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBO' ] row83 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBR' ] row84 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBS' ] row85 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBT' ] row86 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBU' ] row87 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBP' ] row88 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBF' ] row89 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBI' ] row90 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBN' ] row91 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRAW' ] row92 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'LLDM' ] row93 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRBV' ] row94 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= [ 'IRCA' ] row95 at DBI.pm line 1632
-> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
thr#504010
<- fetch= undef row95 at DBI.pm line 1632
-> DESTROY for DBD::Oracle::st (DBI::st=HASH(0xb92170)~INNER)
thr#504010
<- DESTROY= undef at incremental_plates.pl line 334
<- selectcol_arrayref= [ 'IRBY' 'IRCB' 'IRCC' 'IRCD' 'IRQA'
'IRQC' 'IRCE' 'IRCG' 'IRCH' 'OCAA' 'IRCK' 'IRCL' 'IRCN' 'IRQL' 'IRQM'
'IRQN' 'IRCS' 'IRCT' 'IRDP' 'OCAE' 'IRBW' 'IRBC' 'IRCJ' 'DMAA' 'IRCP'
'IRQK' 'IRCV' 'IRCW' 'IRBX' 'IRCF' 'IRCI' 'DMAB' 'IRCR' 'IRCU' 'IRBZ'
'OCAB' 'IRCM' 'IRCO' 'OCAC' 'IRCQ' 'OCAD' ... 54 others skipped ] at
incremental_plates.pl line 334
-> prepare for DBD::Oracle::db (DBI::db=HASH(0xb91f10)~0xb91e70 '
select gb_accnum from seq_info
where clone_id = ?
') thr#504010
dbd_preparse scanned 1 distinct placeholders
fbh 1: 'GB_ACCNUM' NO null , otype 1-> 5, dbsize 20/21, p20.s0
<- prepare= DBI::st=HASH(0x6d11f0) at incremental_plates.pl line
157
-> prepare for DBD::Oracle::db (DBI::db=HASH(0xb91f10)~0xb91e70 '
select c.clone_id, o.collection_name, p.plate,
g.row_pos, g.col_pos, c.cdna_libr_id, l.species
from clone c, cdna_libr l, generic_well g,
generic_plate p, clone_collection o
where c.clone_id = g.clone_id and
g.generic_plate_id = p.generic_plate_id and
p.clone_collection_id = o.clone_collection_id and
c.cdna_libr_id = l.cdna_libr_id
and o.collecti...') thr#504010
dbd_preparse scanned 5 distinct placeholders
fbh 1: 'CLONE_ID' NO null , otype 2-> 5, dbsize 22/172, p12.s0
fbh 2: 'COLLECTION_NAME' NO null , otype 1-> 5, dbsize 10/11,
p10.s0
fbh 3: 'PLATE' NO null , otype 2-> 5, dbsize 22/172, p12.s0
fbh 4: 'ROW_POS' NO null , otype 1-> 5, dbsize 5/6, p5.s0
fbh 5: 'COL_POS' NO null , otype 2-> 5, dbsize 22/172, p5.s0
fbh 6: 'CDNA_LIBR_ID' NO null , otype 2-> 5, dbsize 22/172,
p12.s0
fbh 7: 'SPECIES' NULLable, otype 1-> 5, dbsize 50/51, p50.s0
<- prepare= DBI::st=HASH(0xc15c50) at incremental_plates.pl line
205
-> execute for DBD::Oracle::st (DBI::st=HASH(0xc15c50)~0xc15e40
'IRQA' '01-27-2008' '01-28-2008' '01-27-2008' '01-28-2008') thr#504010
bind :p1 <== 'IRQA' (type 0)
bind :p1 <== 'IRQA' (size 4/5/0, ptype 4, otype 1)
bind :p2 <== '01-27-2008' (type 0)
bind :p2 <== '01-27-2008' (size 10/11/0, ptype 4, otype 1)
bind :p3 <== '01-28-2008' (type 0)
bind :p3 <== '01-28-2008' (size 10/11/0, ptype 4, otype 1)
bind :p4 <== '01-27-2008' (type 0)
bind :p4 <== '01-27-2008' (size 10/11/0, ptype 4, otype 1)
bind :p5 <== '01-28-2008' (type 0)
bind :p5 <== '01-28-2008' (size 10/11/0, ptype 4, otype 1)
dbd_st_execute SELECT (out0, lob0)...
dbd_st_execute SELECT returned (SUCCESS, rpc0, fn4, out0)
<- execute= '0E0' at incremental_plates.pl line 207
-> fetchrow_arrayref for DBD::Oracle::st
(DBI::st=HASH(0xc15c50)~0xc15e40) thr#504010
<- fetchrow_arrayref= undef at incremental_plates.pl line 210
END incremental_plates.pl
-> DESTROY for DBD::Oracle::st (DBI::st=HASH(0xc15e40)~INNER)
thr#504010
<- DESTROY= undef
-> DESTROY for DBD::Oracle::st (DBI::st=HASH(0x51cbe0)~INNER)
thr#504010
<- DESTROY= undef
-- DBI::END ($@: , $!: )
-> disconnect_all for DBD::Oracle::dr
(DBI::dr=HASH(0xb8e010)~0xb8e070) thr#504010
<- disconnect_all= (not implemented) at DBI.pm line 717
! -> DESTROY for DBD::Oracle::db (DBI::db=HASH(0xb91e70)~INNER)
thr#504010
! <- DESTROY= undef during global destruction
! -> DESTROY in DBD::_::common for DBD::Oracle::dr
(DBI::dr=HASH(0xb8e070)~INNER) thr#504010
! <- DESTROY= undef during global destruction
[root@humboldt plate]#

Re: UTF-8 issues connecting to Oracle

am 29.01.2008 00:04:42 von Alexander

I vagely remember that Perl 5.8.0 had some issues regarding UTF-8.
Consider updating to 5.8.1 or newer.

Alexander

On 29.01.2008 00:02, Michael Muratet wrote:
> Greetings
>
> I am using perl 5.8.0 on RedHat ES 3. I got DBD::Oracle-1.19 to build
> and pass the tests after we worked out the kinks from a recent move to
> a new network. I am and have been in the process of trying to get some
> legacy software to run.
>
> When I first tried to run the script it barfed on a statement "use
> constant UNIX => 0' with a message 'Constant name 'UNIX' has unknown
> problems...'. A Google search turned up a known problem with perl on
> ES 3 and the UTF8 character set. I set LANG=en_US and the script ran
> without a error message but produced no output. The
> DBI->connect('dbi:Oracle:', 'user/****@dbname', '') || die
> 'DBI->errstr....' didn't die so I'm assuming it connected OK.
>
> I set the LANG='utf8' again and now I'm seeing:
>
> perl: warning: Setting locale failed.
> perl: warning: Please check that your locale settings:
> LANGUAGE = "utf8",
> LC_ALL = "utf8",
> LANG = "utf8"
> are supported and installed on your system.
> perl: warning: Falling back to the standard locale ("C").
>
>
> More Google searches recommended upgrading perl but it occurred to
> me--all of the tests pass. I see in the /t subdirectory there's a good
> bit of code dealing with UTF8. So, if the tests work it must be
> possible to get the legacy scripts to work.
>
> It's maybe more of an Oracle question than one of DBI/DBD, but could a
> character set problem lead to silent failures?
>
> Can someone help me interpret the trace below?
>
> Thanks
>
> Mike
>
> DBI 1.59-ithread default trace level set to 0x0/2 (pid 26582) at
> incremental_plates.pl line 52
> -> DBI->connect(dbi:Oracle:, prod/xxxxx@image, ****)
> -> DBI->install_driver(Oracle) for linux perl=5.008 pid=26582
> ruid=0 euid=0
> install_driver: DBD::Oracle version 1.19 loaded from
> /usr/lib64/perl5/site_perl/5.8.0/DBD/Oracle.pm
> -> STORE in DBD::_::common for DBD::Oracle::dr
> (DBI::dr=HASH(0xb8e010)~0xb8e070 'ShowErrorStatement' 1) thr#504010
> <- STORE= 1 at Oracle.pm line 61
> <- install_driver= DBI::dr=HASH(0xb8e010)
> -> connect for DBD::Oracle::dr (DBI::dr=HASH(0xb8e010)~0xb8e070 ''
> 'prod/xxxxx@image' **** HASH(0x66f4c0)) thr#504010
> <- connect= DBI::db=HASH(0xb91f10) at DBI.pm line 638
> -> STORE for DBD::Oracle::db (DBI::db=HASH(0xb91e70)~INNER
> 'PrintError' 1) thr#504010
> <- STORE= 1 at DBI.pm line 690
> -> STORE for DBD::Oracle::db (DBI::db=HASH(0xb91e70)~INNER
> 'AutoCommit' 1) thr#504010
> <- STORE= 1 at DBI.pm line 690
> -> STORE for DBD::Oracle::db (DBI::db=HASH(0xb91e70)~INNER
> 'Username' 'prod/xxxxxxx@image') thr#504010
> <- STORE= 1 at DBI.pm line 693
> <> FETCH= 'prod/xxxxxxxx@image' ('Username' from cache) at DBI.pm
> line 693
> -> connected in DBD::_::db for DBD::Oracle::db
> (DBI::db=HASH(0xb91f10)~0xb91e70 'dbi:Oracle:' 'prod/@image' '')
> thr#504010
> <- connected= undef at DBI.pm line 699
> <- connect= DBI::db=HASH(0xb91f10)
> -> STORE for DBD::Oracle::db (DBI::db=HASH(0xb91e70)~INNER
> 'dbi_connect_closure' CODE(0xb8f200)) thr#504010
> <- STORE= 1 at DBI.pm line 708
> -> selectcol_arrayref in DBD::_::db for DBD::Oracle::db
> (DBI::db=HASH(0xb91f10)~0xb91e70 'select collection_name from
> clone_collection') thr#504010
> 1 -> prepare for DBD::Oracle::db (DBI::db=HASH(0xb91e70)~INNER
> 'select collection_name from clone_collection' undef) thr#504010
> fbh 1: 'COLLECTION_NAME' NO null , otype 1-> 5, dbsize
> 10/11, p10.s0
> 1 <- prepare= DBI::st=HASH(0xb921c0) at DBI.pm line 1618
> -> execute for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> dbd_st_execute SELECT (out0, lob0)...
> dbd_st_execute SELECT returned (SUCCESS, rpc0, fn4, out0)
> <- execute= '0E0' at DBI.pm line 1620
> -> bind_col in DBD::_::st for DBD::Oracle::st
> (DBI::st=HASH(0xb921c0)~0xb92170 1 SCALAR(0xb92160)) thr#504010
> <- bind_col= 1 at DBI.pm line 1625
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBY' ] row1 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCB' ] row2 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCC' ] row3 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCD' ] row4 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRQA' ] row5 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRQC' ] row6 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCE' ] row7 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCG' ] row8 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCH' ] row9 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'OCAA' ] row10 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCK' ] row11 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCL' ] row12 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCN' ] row13 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRQL' ] row14 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRQM' ] row15 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRQN' ] row16 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCS' ] row17 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCT' ] row18 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRDP' ] row19 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'OCAE' ] row20 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBW' ] row21 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBC' ] row22 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCJ' ] row23 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'DMAA' ] row24 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCP' ] row25 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRQK' ] row26 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCV' ] row27 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCW' ] row28 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBX' ] row29 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCF' ] row30 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCI' ] row31 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'DMAB' ] row32 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCR' ] row33 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCU' ] row34 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBZ' ] row35 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'OCAB' ] row36 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCM' ] row37 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCO' ] row38 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'OCAC' ] row39 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCQ' ] row40 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'OCAD' ] row41 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCX' ] row42 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'LLAM' ] row43 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'LLAS' ] row44 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAA' ] row45 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAB' ] row46 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAC' ] row47 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'LLCM' ] row48 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAD' ] row49 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAE' ] row50 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAF' ] row51 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAG' ] row52 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAH' ] row53 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAI' ] row54 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAJ' ] row55 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAK' ] row56 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAL' ] row57 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAM' ] row58 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'LLKM' ] row59 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAN' ] row60 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAO' ] row61 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAP' ] row62 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAT' ] row63 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAU' ] row64 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAV' ] row65 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAX' ] row66 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAY' ] row67 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAZ' ] row68 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBA' ] row69 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBB' ] row70 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBD' ] row71 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBE' ] row72 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBG' ] row73 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBH' ] row74 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'NDAM' ] row75 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'NDCM' ] row76 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'NDKM' ] row77 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'NDKO' ] row78 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBL' ] row79 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBQ' ] row80 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBK' ] row81 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBM' ] row82 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBO' ] row83 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBR' ] row84 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBS' ] row85 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBT' ] row86 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBU' ] row87 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBP' ] row88 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBF' ] row89 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBI' ] row90 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBN' ] row91 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRAW' ] row92 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'LLDM' ] row93 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRBV' ] row94 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= [ 'IRCA' ] row95 at DBI.pm line 1632
> -> fetch for DBD::Oracle::st (DBI::st=HASH(0xb921c0)~0xb92170)
> thr#504010
> <- fetch= undef row95 at DBI.pm line 1632
> -> DESTROY for DBD::Oracle::st (DBI::st=HASH(0xb92170)~INNER)
> thr#504010
> <- DESTROY= undef at incremental_plates.pl line 334
> <- selectcol_arrayref= [ 'IRBY' 'IRCB' 'IRCC' 'IRCD' 'IRQA' 'IRQC'
> 'IRCE' 'IRCG' 'IRCH' 'OCAA' 'IRCK' 'IRCL' 'IRCN' 'IRQL' 'IRQM' 'IRQN'
> 'IRCS' 'IRCT' 'IRDP' 'OCAE' 'IRBW' 'IRBC' 'IRCJ' 'DMAA' 'IRCP' 'IRQK'
> 'IRCV' 'IRCW' 'IRBX' 'IRCF' 'IRCI' 'DMAB' 'IRCR' 'IRCU' 'IRBZ' 'OCAB'
> 'IRCM' 'IRCO' 'OCAC' 'IRCQ' 'OCAD' ... 54 others skipped ] at
> incremental_plates.pl line 334
> -> prepare for DBD::Oracle::db (DBI::db=HASH(0xb91f10)~0xb91e70
> ' select gb_accnum from seq_info
> where clone_id = ?
> ') thr#504010
> dbd_preparse scanned 1 distinct placeholders
> fbh 1: 'GB_ACCNUM' NO null , otype 1-> 5, dbsize 20/21, p20.s0
> <- prepare= DBI::st=HASH(0x6d11f0) at incremental_plates.pl line 157
> -> prepare for DBD::Oracle::db (DBI::db=HASH(0xb91f10)~0xb91e70
> ' select c.clone_id, o.collection_name, p.plate,
> g.row_pos, g.col_pos, c.cdna_libr_id, l.species
> from clone c, cdna_libr l, generic_well g,
> generic_plate p, clone_collection o
> where c.clone_id = g.clone_id and
> g.generic_plate_id = p.generic_plate_id and
> p.clone_collection_id = o.clone_collection_id and
> c.cdna_libr_id = l.cdna_libr_id
> and o.collecti...') thr#504010
> dbd_preparse scanned 5 distinct placeholders
> fbh 1: 'CLONE_ID' NO null , otype 2-> 5, dbsize 22/172, p12.s0
> fbh 2: 'COLLECTION_NAME' NO null , otype 1-> 5, dbsize
> 10/11, p10.s0
> fbh 3: 'PLATE' NO null , otype 2-> 5, dbsize 22/172, p12.s0
> fbh 4: 'ROW_POS' NO null , otype 1-> 5, dbsize 5/6, p5.s0
> fbh 5: 'COL_POS' NO null , otype 2-> 5, dbsize 22/172, p5.s0
> fbh 6: 'CDNA_LIBR_ID' NO null , otype 2-> 5, dbsize 22/172,
> p12.s0
> fbh 7: 'SPECIES' NULLable, otype 1-> 5, dbsize 50/51, p50.s0
> <- prepare= DBI::st=HASH(0xc15c50) at incremental_plates.pl line 205
> -> execute for DBD::Oracle::st (DBI::st=HASH(0xc15c50)~0xc15e40
> 'IRQA' '01-27-2008' '01-28-2008' '01-27-2008' '01-28-2008') thr#504010
> bind :p1 <== 'IRQA' (type 0)
> bind :p1 <== 'IRQA' (size 4/5/0, ptype 4, otype 1)
> bind :p2 <== '01-27-2008' (type 0)
> bind :p2 <== '01-27-2008' (size 10/11/0, ptype 4, otype 1)
> bind :p3 <== '01-28-2008' (type 0)
> bind :p3 <== '01-28-2008' (size 10/11/0, ptype 4, otype 1)
> bind :p4 <== '01-27-2008' (type 0)
> bind :p4 <== '01-27-2008' (size 10/11/0, ptype 4, otype 1)
> bind :p5 <== '01-28-2008' (type 0)
> bind :p5 <== '01-28-2008' (size 10/11/0, ptype 4, otype 1)
> dbd_st_execute SELECT (out0, lob0)...
> dbd_st_execute SELECT returned (SUCCESS, rpc0, fn4, out0)
> <- execute= '0E0' at incremental_plates.pl line 207
> -> fetchrow_arrayref for DBD::Oracle::st
> (DBI::st=HASH(0xc15c50)~0xc15e40) thr#504010
> <- fetchrow_arrayref= undef at incremental_plates.pl line 210
> END incremental_plates.pl
> -> DESTROY for DBD::Oracle::st (DBI::st=HASH(0xc15e40)~INNER)
> thr#504010
> <- DESTROY= undef
> -> DESTROY for DBD::Oracle::st (DBI::st=HASH(0x51cbe0)~INNER)
> thr#504010
> <- DESTROY= undef
> -- DBI::END ($@: , $!: )
> -> disconnect_all for DBD::Oracle::dr
> (DBI::dr=HASH(0xb8e010)~0xb8e070) thr#504010
> <- disconnect_all= (not implemented) at DBI.pm line 717
> ! -> DESTROY for DBD::Oracle::db (DBI::db=HASH(0xb91e70)~INNER)
> thr#504010
> ! <- DESTROY= undef during global destruction
> ! -> DESTROY in DBD::_::common for DBD::Oracle::dr
> (DBI::dr=HASH(0xb8e070)~INNER) thr#504010
> ! <- DESTROY= undef during global destruction
> [root@humboldt plate]#
>


--
Alexander Foken
mailto:alexander@foken.de http://www.foken.de/alexander/

Re: [DBI-Users] UTF-8 issues connecting to Oracle

am 29.01.2008 08:33:47 von hermann.schwaerzler

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

hello

Michael Muratet wrote:
[...]
> I set the LANG='utf8' again and now I'm seeing:
>
> perl: warning: Setting locale failed.
> perl: warning: Please check that your locale settings:
> LANGUAGE = "utf8",
> LC_ALL = "utf8",
> LANG = "utf8"
> are supported and installed on your system.
> perl: warning: Falling back to the standard locale ("C").

check if "locale -a" really outputs a locale named "utf8" as being
installed on your system. more likely it is "es_US.utf8" or something
similar. you have to use this when you set LANG!

you probably know that in order to set the character-set for the
communication with the oracle database-server you have to set NLS_LANG
accordingly before starting the perl-program that does the connection?
e.g. NLS_LANG=american_america.AL32UTF8 for utf8!

regards
hermann schwärzler
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.6 (GNU/Linux)

iD8DBQFHntbZpZ4QdpzGMxwRAriLAKDR7D66aUYtBIJ7DVynhdQ1UJZu3gCg 45LH
jxKMEUQ+3fAdZbws6TaAsz0=
=xzbW
-----END PGP SIGNATURE-----

Re: [DBI-Users] UTF-8 issues connecting to Oracle

am 29.01.2008 21:52:24 von mmuratet

Hello again

I've got the problem solved, thanks to all that helped.

After all the other issues were solved, it was simply that the query =20
returned no rows. D'oh.

Cheers

Mike

On Jan 29, 2008, at 1:33 AM, Hermann Schwaerzler wrote:

> -----BEGIN PGP SIGNED MESSAGE-----
> Hash: SHA1
>
> hello
>
> Michael Muratet wrote:
> [...]
>> I set the LANG=3D'utf8' again and now I'm seeing:
>>
>> perl: warning: Setting locale failed.
>> perl: warning: Please check that your locale settings:
>> LANGUAGE =3D "utf8",
>> LC_ALL =3D "utf8",
>> LANG =3D "utf8"
>> are supported and installed on your system.
>> perl: warning: Falling back to the standard locale ("C").
>
> check if "locale -a" really outputs a locale named "utf8" as being
> installed on your system. more likely it is "es_US.utf8" or something
> similar. you have to use this when you set LANG!
>
> you probably know that in order to set the character-set for the
> communication with the oracle database-server you have to set NLS_LANG
> accordingly before starting the perl-program that does the connection?
> e.g. NLS_LANG=3Damerican_america.AL32UTF8 for utf8!
>
> regards
> hermann schwärzler
> -----BEGIN PGP SIGNATURE-----
> Version: GnuPG v1.4.6 (GNU/Linux)
>
> iD8DBQFHntbZpZ4QdpzGMxwRAriLAKDR7D66aUYtBIJ7DVynhdQ1UJZu3gCg 45LH
> jxKMEUQ+3fAdZbws6TaAsz0=3D
> =3DxzbW
> -----END PGP SIGNATURE-----