[Fwd: RE: ORA-01461: can bind a LONG value only.. while insert]
[Fwd: RE: ORA-01461: can bind a LONG value only.. while insert]
am 30.09.2004 18:59:43 von Ravi.Kongara
Thanks Ron, for pointing me to right link.
It's resolved now. I was hitting 4000 bytes limit, eventhough
the string length is around 1390 characters due to my NLS_LANG
setting(WE8..) and Oracle8's interpretation of anything > 4000 as LONG.
Now i'm truncating the string to 1300 characters and it worked!
modified code:
$tgt_key_col_and_val_str = substr( $tgt_key_col_and_val_str,0,1300 );
Ravi
-------- Original Message --------
Subject: RE: ORA-01461: can bind a LONG value only.. while insert
Date: Thu, 30 Sep 2004 08:51:30 -0600
From: Reidy, Ron
To: Ravi.Kongara@Sun.COM
1. Got to http://metalink.oracle.com
2. Log in
3. Click the "Advanced" button at the top center of the page
4. Enter the Note # in the field labeled "Document ID"
5. Click "Submit"
-----------------
Ron Reidy
Lead DBA
Array BioPharma, Inc.
-----Original Message-----
From: Ravi Kongara [mailto:Ravi.Kongara@Sun.COM]
Sent: Wednesday, September 29, 2004 4:53 PM
To: Reidy, Ron
Subject: Re: ORA-01461: can bind a LONG value only.. while insert
Can you tell me how can i access this link.
Thanks,
Ravi
Reidy, Ron wrote:
>See metalink note 241358.1
>
>-----------------
>Ron Reidy
>Lead DBA
>Array BioPharma, Inc.
>
>
>-----Original Message-----
>From: Ravi Kongara [mailto:Ravi.Kongara@Sun.COM]
>Sent: Wednesday, September 29, 2004 4:14 PM
>To: DBI-Users
>Subject: ORA-01461: can bind a LONG value only.. while insert
>
>
>Folks,
>
>I see following error popping up while inserting into a non-LONG table.
>
>"DBD::Oracle::st execute failed: ORA-01461: can bind a LONG value only
>for insert into a LONG column (DBD ERROR: OCIStmtExecute)".
>
>The said table doesn't have any LONG columns. Did anyone face this kind
>of error. Can you suggest me
>what should be done to supress this error.
>Versions: DBI/DBD::Oracle = 1.42/1.14
>
>SQL> desc recon_detail
> Name Null? Type
> -----------------------------------------
> SOURCE_ID NOT NULL NUMBER
> TABLE_NAME NOT NULL VARCHAR2(30)
> FILE_NAME VARCHAR2(50)
> TYPE NOT NULL VARCHAR2(15)
> SCOPE VARCHAR2(6)
> RUN_ID NOT NULL NUMBER
> SRC_KEY VARCHAR2(4000)
> TGT_KEY VARCHAR2(4000)
> MISMATCHED_COLUMNS VARCHAR2(4000)
> FILE_LINE_NO NUMBER
> UPDATE_DATE DATE
>
>--------- begin code block ------------
>#!/usr/perl5/bin/perl
>
># Import packages
>use Getopt::Long;
>use DBI;
>
># Import user defined packages
>use ReconGenModule;
>use ReconDbPkcolumnTest;
>use DBD::Oracle qw(:ora_types);
>
>eval {
> $dbh = DBI->connect( "dbi:Oracle:$host_db", $host_user, $host_passwd,
> { AutoCommit => 1, RaiseError => 1, PrintError => 0 } );
>};
>if ( $@ ) {
> warn "Unable to connect to the host database in main() routine\n";
> exit 1;
> }
>
>sub insert_allcol_mismatch_details
>{
>my $sth_temp = $dbh->prepare( "insert into recon_detail
> ( source_id,
> table_name,
> type,
> scope,
> run_id,
> src_key,
> tgt_key,
> update_date)
> values (
>$source_id,?,?,?,$run_id,?,?,sysdate )" );
>
>$sth_temp->trace(3);
>
> while ( my $key = shift @tgt_only ) {
>
> my $src_key_col_and_val_str;
> my $tgt_key_col_and_val_str;
> my @tgt_key_values = split /\|/,$key;
>
> for my $k ( 0..$#tgt_key_values ) {
> $tgt_key_col_and_val_str =
>$tgt_key_col_and_val_str.$tgt_key_columns[$k]."=".$tgt_key_ values[$k].$delim;
> }
>
> chop( $tgt_key_col_and_val_str);
>
># Cut off string so that it doesn't exceed maximum byte size(4000) of
>Oracle's VARCHAR2 column
># Allow some cushion for multi-byte characters
>
> $tgt_key_col_and_val_str = substr( $tgt_key_col_and_val_str,0,3500 );
>
> $tgt_key_col_and_val_str =~s/[[:cntrl:]]//g; # remove control characters
>
> $src_key_col_and_val_str = "SRC ROW MISSING";
>
> $sth_temp->bind_param( 1, $ods_table_name );
> $sth_temp->bind_param( 2, $recon_type );
> $sth_temp->bind_param( 3, $recon_scope );
> $sth_temp->bind_param( 4, $src_key_col_and_val_str, { ora_type =>
>ORA_VARCHAR2 } );
> $sth_temp->bind_param( 5, $tgt_key_col_and_val_str, { ora_type =>
>ORA_VARCHAR2 } );
> $sth_temp->execute();
> $tgt_only_count++;
> }
> $sth_temp->finish();
> }
>}
>----- end code block -----
>
> Trace output near error point
>-----------------------
>-> bind_param for DBD::Oracle::st (DBI::st=HASH(0x489400)~0x44fd9c 1
>'VALID_POS_TRANSACTION')
> bind :p1 <== 'VALID_POS_TRANSACTION' (type 0)
> bind :p1 <== 'VALID_POS_TRANSACTION' (size 21/22/0, ptype 4, otype 1)
> bind :p1 <== 'VALID_POS_TRANSACTION' (size 21/21, otype 1, indp 0,
>at_exec 1)
> bind :p1 done with ftype 1
> <- bind_param= 1 at ReconDbColbycolTest.pm line 994 via
>/apps/ods/scripts/ReconDbColbycolTest.pm line 241
> -> bind_param for DBD::Oracle::st (DBI::st=HASH(0x489400)~0x44fd9c 2
>'PKCOLUMN')
> bind :p2 <== 'PKCOLUMN' (type 0)
> bind :p2 <== 'PKCOLUMN' (size 8/9/0, ptype 4, otype 1)
> bind :p2 <== 'PKCOLUMN' (size 8/8, otype 1, indp 0, at_exec 1)
> bind :p2 done with ftype 1
> <- bind_param= 1 at ReconDbColbycolTest.pm line 995 via
>/apps/ods/scripts/ReconDbColbycolTest.pm line 241
> -> bind_param for DBD::Oracle::st (DBI::st=HASH(0x489400)~0x44fd9c 3
>'NET')
> bind :p3 <== 'NET' (type 0)
> bind :p3 <== 'NET' (size 3/4/0, ptype 4, otype 1)
> bind :p3 <== 'NET' (size 3/3, otype 1, indp 0, at_exec 1)
> bind :p3 done with ftype 1
> <- bind_param= 1 at ReconDbColbycolTest.pm line 996 via
>/apps/ods/scripts/ReconDbColbycolTest.pm line 241
> -> bind_param for DBD::Oracle::st (DBI::st=HASH(0x489400)~0x44fd9c 4
>'SRC ROW MISSING' HASH(0xa23864))
> bind :p4 <== 'SRC ROW MISSING' (type 0, attribs: HASH(0xa23864))
> bind :p4 <== 'SRC ROW MISSING' (size 15/1469/0, ptype 4, otype 1)
> bind :p4 <== 'SRC ROW MISSING' (size 15/1468, otype 1, indp 0,
>at_exec 1)
> bind :p4 done with ftype 1
> <- bind_param= 1 at ReconDbColbycolTest.pm line 997 via
>/apps/ods/scripts/ReconDbColbycolTest.pm line 241
> -> bind_param for DBD::Oracle::st (DBI::st=HASH(0x489400)~0x44fd9c 5
>'BATCH_ID=1574;POS_TRAN_ID=505362;PROGRAM_TYPE=PSR;TRAN_SOU RCE=POSLOAD;PARENT_AGREE_CODE=GSO-IT-040001-SYP;PARENT_AGREE _NAME=ATLANTICA
>SISTEMI
>SRL;AGREE_CODE=;AGREE_TYPE=;RESELLER_NAME=;MKT_PART_NUMBER= XTA-3000-2URK-19U;MKT_PART_DESC=SE3000
>2U Univ Rk Rail
>Kit;SIC=M;SERIAL_NUMBER=;SHIP_DATE=07-30-2004:00:00:00;QUAN TITY=2;NET_PRICE=245;LIST_PRICE=350;PRICE_CLASS=P;TOTAL_PRIC E=490;TRAN_CURRENCY=...'
>HASH(0xa23864))
>bind :p5 <==
>'BATCH_ID=1574;POS_TRAN_ID=505362;PROGRAM_TYPE=PSR;TRAN_SOU RCE=POSLOAD;PARENT_AGREE_CODE=GSO-IT-040001-SYP;PARENT_AGREE _NAME=ATLANTICA
>SISTEMI
>SRL;AGREE_CODE=;AGREE_TYPE=;RESELLER_NAME=;MKT_PART_NUMBER= XTA-3000-2URK-19U;MKT_PART_DESC=SE3000
>2U Univ Rk Rail
>Kit;SIC=M;SERIAL_NUMBER=;SHIP_DATE=07-30-2004:00:00:00;QUAN TITY=2;NET_PRICE=245;LIST_PRICE=350;PRICE_CLASS=P;TOTAL_PRIC E=490;TRAN_CURRENCY=...'
>(type 0, attribs: HASH(0xa23864))
> bind :p5 <==
>'BATCH_ID=1574;POS_TRAN_ID=505362;PROGRAM_TYPE=PSR;TRAN_SOU RCE=POSLOAD;PARENT_AGREE_CODE=GSO-IT-040001-SYP;PARENT_AGREE _NAME=ATLANTICA
>SISTEMI
>SRL;AGREE_CODE=;AGREE_TYPE=;RESELLER_NAME=;MKT_PART_NUMBER= XTA-3000-2URK-19U;MKT_PART_DESC=SE3000
>2U Univ Rk Rail
>Kit;SIC=M;SERIAL_NUMBER=;SHIP_DATE=07-30-2004:00:00:00;QUAN TITY=2;NET_PRICE=245;LIST_PRICE=350;PRICE_CLASS=P;TOTAL_PRIC E=490;TRAN_CURRENCY=...'
>(size 1394/1395/0, ptype 4, otype 1)
> bind :p5 <==
>'BATCH_ID=1574;POS_TRAN_ID=505362;PROGRAM_TYPE=PSR;TRAN_SOU RCE=POSLOAD;PARENT_AGREE_CODE=GSO-IT-040001-SYP;PARENT_AGREE _NAME=ATLANTICA
>SISTEMI
>SRL;AGREE_CODE=;AGREE_TYPE=;RESELLER_NAME=;MKT_PART_NUMBER= XTA-3000-2URK-19U;MKT_PART_DESC=SE3000
>2U Univ Rk Rail
>Kit;SIC=M;SERIAL_NUMBER=;SHIP_DATE=07-30-2004:00:00:00;QUAN TITY=2;NET_PRICE=245;LIST_PRICE=350;PRICE_CLASS=P;TOTAL_PRIC E=490;TRAN_CURRENCY=EUR;U'
>(size 1394/1394, otype 1, indp 0, at_exec 1)
> bind :p5 done with ftype 1
> <- bind_param= 1 at ReconDbColbycolTest.pm line 998 via
>/apps/ods/scripts/ReconDbColbycolTest.pm line 241
> -> execute for DBD::Oracle::st (DBI::st=HASH(0x489400)~0x44fd9c)
> dbd_st_execute INSERT (out0, lob0)...
> in ':p1' [0,0]: len 21, ind 0
> in ':p2' [0,0]: len 8, ind 0
> in ':p3' [0,0]: len 3, ind 0
> in ':p4' [0,0]: len 15, ind 0
> in ':p5' [0,0]: len 1394, ind 0
> !! ERROR: 1461 'ORA-01461: can bind a LONG value only for insert
>into a LONG column (DBD ERROR: OCIStmtExecute)' (err#0)
> <- execute= undef at ReconDbColbycolTest.pm line 1000 via
>/apps/ods/scripts/ReconDbColbycolTest.pm line 241
>1 -> FETCH for DBD::Oracle::st (DBI::st=HASH(0x44fd9c)~INNER
>'ParamValues')
> ERROR: 1461 'ORA-01461: can bind a LONG value only for insert
>into a LONG column (DBD ERROR: OCIStmtExecute)' (err#0)
>1 <- FETCH= HASH(0x1cc9e50)5keys at ReconDbColbycolTest.pm line 1000
>via /apps/ods/scripts/ReconDbColbycolTest.pm line 241
>DBD::Oracle::st execute failed: ORA-01461: can bind a LONG value only
>for insert into a LONG column (DBD ERROR: OCIStmtExecute) [for Statement
>"insert into recon_detail ( source_id,
> table_name,
> type,
> scope,
> run_id,
> src_key,
> tgt_key,
> update_date)
> values (
>504,?,?,?,82210,?,?,sysdate )" with ParamValues: :p4='SRC ROW MISSING',
>:p5='BATCH_ID=1574;POS_TRAN_ID=505362;PROGRAM_TYPE=PSR;TRAN _SOURCE=POSLOAD;PARENT_AGREE_CODE=GSO-IT-040001-SYP;PARENT_A GREE_NAME=ATLANTICA
>SISTEMI
>SRL;AGREE_CODE=;AGREE_TYPE=;RESELLER_NAME=;MKT_PART_NUMBER= XTA-3000-2URK-19U;MKT_PART_DESC=SE3000
>2U Univ Rk Rail
>Kit;SIC=M;SERIAL_NUMBER=;SHIP_DATE=07-30-2004:00:00:00;QUAN TITY=2;NET_PRICE=245;LIST_PRICE=350;PRICE_CLASS=P;TOTAL_PRIC E=490;TRAN_CURRENCY=...',
>:p1='VALID_POS_TRANSACTION', :p2='PKCOLUMN', :p3='NET'] at
>/apps/ods/scripts/ReconDbColbycolTest.pm line 1000.
> -> DESTROY for DBD::Oracle::st (DBI::st=HASH(0x44fd9c)~INNER)
> ERROR: 1461 'ORA-01461: can bind a LONG value only for insert
>into a LONG column (DBD ERROR: OCIStmtExecute)' (err#0)
> <- DESTROY= undef
>------- end trace output ---------
>
>Thanks,
>Ravi
>
>
>This electronic message transmission is a PRIVATE communication which contains
>information which may be confidential or privileged. The information is intended
>to be for the use of the individual or entity named above. If you are not the
>intended recipient, please be aware that any disclosure, copying, distribution
>or use of the contents of this information is prohibited. Please notify the
>sender of the delivery error by replying to this message, or notify us by
>telephone (877-633-2436, ext. 0), and then delete it from your system.
>
>
>
This electronic message transmission is a PRIVATE communication which contains
information which may be confidential or privileged. The information is intended
to be for the use of the individual or entity named above. If you are not the
intended recipient, please be aware that any disclosure, copying, distribution
or use of the contents of this information is prohibited. Please notify the
sender of the delivery error by replying to this message, or notify us by
telephone (877-633-2436, ext. 0), and then delete it from your system.
DBD-Oracle
am 30.09.2004 19:23:29 von rgoud
--0-67239641-1096565009=:8887
Content-Type: text/plain; charset=us-ascii
Hi list, I am trying to load the following data into Oracle table which has a date column
bash-2.03$ cat processed.csv
test.com|16/Aug/2004:15:06:14|/index.html|demo1|Demo Company|
test.com|16/Aug/2004:15:06:15|/index.jhtml|demo1|Demo Company|
test.com|16/Aug/2004:15:06:54|/index.jhtml|demo1|Demo Company|
Here is my code ....
#!/usr/bin/perl -w
use DBI;
use strict;
use DBI qw(:sql_types);
DBI->trace( 2, 'dbitrace.log' );
my $dbh1 = DBI->connect("DBI:CSV:");
$dbh1->{'csv_tables'}->{'processed'} = {
'eol' => "\n",
'sep_char' => "|",
'quote_char' => undef,
'escape_char' => undef,
'file' => '/home/user1/reports/processed.csv',
'col_names' => ["hostname", "datetime", "url","username", "company"]
};
my $dbh2 = DBI->connect("dbi:Oracle:db1", "report", "report" ) or die "Can't make 2nd database connect: $DBI::errstr\n";
my($hostname, $url, $username, $company, $datetime);
#my($hostname, $url, $username, $company);
#$sel1->bind_columns(undef, \$hostname, \$datetime, \$url, \$username, \$company);
my $sel1 = $dbh1->prepare("SELECT hostname,datetime,url,username,company FROM processed");
$sel1->execute();
my $array_ref = $sel1->fetchall_arrayref();
$sel1->bind_columns( undef, \$hostname, \$datetime, \$url, \$username, \$company );
foreach my $row (@$array_ref) {
my ($hostname, $url, $username, $company, $datetime) = @$row;
$dbh2->do("INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )", undef, $hostname, $datetime
, $url, $username, $company );
}
$dbh1->disconnect();
When I execute the perl code I am getting the following errors
bash-2.03$ perl test4.pl
DBD::Oracle::db do failed: ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute) [for Statement "INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )"] at test4.pl line 34.
DBD::Oracle::db do failed: ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute) [for Statement "INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )"] at test4.pl line 34.
DBD::Oracle::db do failed: ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute) [for Statement "INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )"] at test4.pl line 34.
Here is the table information
SQL> desc webtest
Name Null? Type
----------------------------------------- -------- ----------------------------
HOSTNAME VARCHAR2(100)
DATETIME DATE
URL VARCHAR2(1000)
USERNAME VARCHAR2(20)
COMPANY VARCHAR2(100)
Here is the dbitrace log, please let me know the problem.
bash-2.03$ cat dbitrace.log
DBI 1.43-nothread default trace level set to 0x0/2 (pid 3648)
-> DBI->connect(DBI:CSV:, , ****)
-> DBI->install_driver(CSV) for solaris perl=5.006001 pid=3648 ruid=501 euid=501
install_driver: DBD::CSV version 0.21 loaded from /usr/local/lib/perl5/site_perl/5.6.1/DBD/CSV.pm
<- install_driver= DBI::dr=HASH(0x1b6268)
-> default_user in DBD::_::dr for DBD::CSV::dr (DBI::dr=HASH(0x1b6268)~0x3c7750 undef undef HASH(0x18ded8))
<- default_user= ( undef undef ) [2 items] at DBI.pm line 577
-> connect for DBD::CSV::dr (DBI::dr=HASH(0x1b6268)~0x3c7750 '' undef **** HASH(0x207388))
-> STORE in DBD::File::db for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'f_dir' '.')
<- STORE= 1 at File.pm line 75
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'f_valid_attrs' HASH(0x2073dc))
<- STORE= 1 at File.pm line 89
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'sql_valid_attrs' HASH(0x20751c))
<- STORE= 1 at File.pm line 94
-> STORE for DBD::CSV::db (DBI::db=HASH(0x3c7744)~0x20737c 'Active' 1)
<- STORE= 1 at File.pm line 100
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'f_version' '0.31')
<- STORE= 1 at File.pm line 106
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'sql_nano_version' '0.01')
<- STORE= 1 at File.pm line 108
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'sql_statement_version' '1.09')
<- STORE= 1 at File.pm line 108
<> FETCH= '1.09' ('sql_statement_version' from cache) at File.pm line 110
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'sql_handler' 'SQL::Statement')
<- STORE= 1 at File.pm line 110
-> FETCH in DBD::File::db for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'csv_tables')
<- FETCH= undef at CSV.pm line 74
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'csv_tables' HASH(0x207570))
<- STORE= 1 at CSV.pm line 74
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'Active' 1)
<- STORE= 1 at CSV.pm line 75
<- connect= DBI::db=HASH(0x3c7744) at DBI.pm line 595
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'PrintError' 1)
<- STORE= 1 at DBI.pm line 642
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'AutoCommit' 1)
<- STORE= 1 at DBI.pm line 642
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'Username' undef)
<- STORE= 1 at DBI.pm line 645
<> FETCH= undef ('Username' from cache) at DBI.pm line 645
<- connect= DBI::db=HASH(0x3c7744)
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'dbi_connect_closure' CODE(0x3c77d4))
<- STORE= 1 at DBI.pm line 665
<> FETCH= HASH(0x207570)0keys ('csv_tables' from cache) at test4.pl line 9
-> DBI->connect(dbi:Oracle:db1, report, ****)
-> DBI->install_driver(Oracle) for solaris perl=5.006001 pid=3648 ruid=501 euid=501
install_driver: DBD::Oracle version 1.14 loaded from /usr/local/lib/perl5/site_perl/5.6.1/sun4-solaris/DBD/Oracle .pm
-> STORE in DBD::_::common for DBD::Oracle::dr (DBI::dr=HASH(0x207480)~0x3f05b8 'ShowErrorStatement' 1)
<- STORE= 1 at Oracle.pm line 64
<- install_driver= DBI::dr=HASH(0x207480)
-> connect for DBD::Oracle::dr (DBI::dr=HASH(0x207480)~0x3f05b8 'db1' 'report' **** HASH(0x3c7e48))
<- connect= DBI::db=HASH(0x38ec74) at DBI.pm line 595
-> STORE for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'PrintError' 1)
<- STORE= 1 at DBI.pm line 642
-> STORE for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'AutoCommit' 1)
<- STORE= 1 at DBI.pm line 642
-> STORE for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'Username' 'report')
<- STORE= 1 at DBI.pm line 645
<> FETCH= 'report' ('Username' from cache) at DBI.pm line 645
<- connect= DBI::db=HASH(0x38ec74)
-> STORE for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'dbi_connect_closure' CODE(0x3cea8c))
<- STORE= 1 at DBI.pm line 665
-> prepare in DBD::File::db for DBD::CSV::db (DBI::db=HASH(0x3c7744)~0x20737c 'SELECT hostname,datetime,url,username,company FROM processed')
<> FETCH= 'DBD::CSV::st' ('ImplementorClass' from cache) at File.pm line 162
1 -> csv_cache_sql_parser_object for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER)
2 -> FETCH in DBD::File::db for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'RaiseError')
2 <- FETCH= ( '' ) [1 items] at CSV.pm line 87
2 -> FETCH for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'PrintError')
2 <- FETCH= ( 1 ) [1 items] at CSV.pm line 87
2 -> FETCH for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'csv_sql')
2 <- FETCH= undef at CSV.pm line 92
1 <- csv_cache_sql_parser_object= SQL::Parser=HASH(0x5fc118) at File.pm line 174
-> STORE in DBD::File::st for DBD::CSV::st (DBI::st=HASH(0x3c7f20)~0x3c7e3c 'f_stmt' DBD::CSV::Statement=HASH(0x5fbddc))
<- STORE= 1 at File.pm line 189
-> STORE for DBD::CSV::st (DBI::st=HASH(0x3c7f20)~0x3c7e3c 'f_params' ARRAY(0x5f22d4))
<- STORE= 1 at File.pm line 190
-> STORE for DBD::CSV::st (DBI::st=HASH(0x3c7f20)~0x3c7e3c 'NUM_OF_PARAMS' 0)
<- STORE= 1 at File.pm line 191
<- prepare= DBI::st=HASH(0x3c7f20) at test4.pl line 25
-> execute in DBD::File::st for DBD::CSV::st (DBI::st=HASH(0x3c7f20)~0x3c7e3c)
1 -> FETCH in DBD::File::st for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 'NUM_OF_FIELDS')
1 <- FETCH= undef at File.pm line 435
1 -> STORE for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 'NUM_OF_FIELDS' 5)
1 <- STORE= 1 at File.pm line 435
<- execute= 3 at test4.pl line 26
-> fetchall_arrayref in DBD::_::st for DBD::CSV::st (DBI::st=HASH(0x3c7f20)~0x3c7e3c)
1 -> fetch in DBD::File::st for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER)
2 -> FETCH for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 'ChopBlanks')
2 <- FETCH= '' at File.pm line 457
1 <- fetch= [ 'test.com' '16/Aug/2004:15:06:14' '/index.html' 'demo1' 'Demo Company' ] row1 at DBI.pm line 1825
1 -> fetch for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER)
2 -> FETCH for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 'ChopBlanks')
2 <- FETCH= '' at File.pm line 457
1 <- fetch= [ 'test.com' '16/Aug/2004:15:06:15' '/index.jhtml' 'demo1' 'Demo Company' ] row2 at DBI.pm line 1825
1 -> fetch for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER)
2 -> FETCH for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 'ChopBlanks')
2 <- FETCH= '' at File.pm line 457
1 <- fetch= [ 'test.com' '16/Aug/2004:15:06:54' '/index.jhtml' 'demo1' 'Demo Company' ] row3 at DBI.pm line 1825
1 -> fetch for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER)
1 <- fetch= undef row3 at DBI.pm line 1825
<- fetchall_arrayref= [ ARRAY(0x5f28d0) ARRAY(0x5f4208) ARRAY(0x5f425c) ] row3 at test4.pl line 28
-> bind_columns in DBD::_::st for DBD::CSV::st (DBI::st=HASH(0x3c7f20)~0x3c7e3c undef SCALAR(0x16eab0) SCALAR(0x16ea50) SCALAR(0x16eaa4) SCALAR(0x16ea80) SCALAR(0x16ea68))
1 <> FETCH= 5 ('NUM_OF_FIELDS' from cache) at DBI.pm line 1695
1 -> bind_col in DBD::_::st for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 1 SCALAR(0x16eab0) undef)
1 <- bind_col= 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 2 SCALAR(0x16ea50) undef)
1 <- bind_col= 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 3 SCALAR(0x16eaa4) undef)
1 <- bind_col= 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 4 SCALAR(0x16ea80) undef)
1 <- bind_col= 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 5 SCALAR(0x16ea68) undef)
1 <- bind_col= 1 at DBI.pm line 1708
<- bind_columns= 1 at test4.pl line 30
-> do in DBD::_::db for DBD::Oracle::db (DBI::db=HASH(0x38ec74)~0x3c7e78 'INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef 'test.com' 'Demo Company' '16/Aug/2004:15:06:14' '/index.html' 'demo1')
1 -> prepare for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef)
dbd_preparse scanned 5 distinct placeholders
1 <- prepare= DBI::st=HASH(0x5fc01c) at DBI.pm line 1427
-> execute for DBD::Oracle::st (DBI::st=HASH(0x5fc01c)~0x5f431c 'test.com' 'Demo Company' '16/Aug/2004:15:06:14' '/index.html' 'demo1')
bind :p1 <== 'test.com' (type 0)
bind :p1 <== 'test.com' (size 8/9/0, ptype 4, otype 1)
bind :p2 <== 'Demo Company' (type 0)
bind :p2 <== 'Demo Company' (size 12/13/0, ptype 4, otype 1)
bind :p3 <== '16/Aug/2004:15:06:14' (type 0)
bind :p3 <== '16/Aug/2004:15:06:14' (size 20/21/0, ptype 4, otype 1)
bind :p4 <== '/index.html' (type 0)
bind :p4 <== '/index.html' (size 11/12/0, ptype 4, otype 1)
bind :p5 <== 'demo1' (type 0)
bind :p5 <== 'demo1' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- execute= undef at DBI.pm line 1428
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- do= undef at test4.pl line 34
1 -> FETCH for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'ParamValues')
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
1 <- FETCH= undef at test4.pl line 34
-> DESTROY for DBD::Oracle::st (DBI::st=HASH(0x5f431c)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY= undef at test4.pl line 34
-> do for DBD::Oracle::db (DBI::db=HASH(0x38ec74)~0x3c7e78 'INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef 'test.com' 'Demo Company' '16/Aug/2004:15:06:15' '/index.jhtml' 'demo1')
1 -> prepare for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef)
dbd_preparse scanned 5 distinct placeholders
1 <- prepare= DBI::st=HASH(0x5f4364) at DBI.pm line 1427
-> execute for DBD::Oracle::st (DBI::st=HASH(0x5f4364)~0x5f43f4 'test.com' 'Demo Company' '16/Aug/2004:15:06:15' '/index.jhtml' 'demo1')
bind :p1 <== 'test.com' (type 0)
bind :p1 <== 'test.com' (size 8/9/0, ptype 4, otype 1)
bind :p2 <== 'Demo Company' (type 0)
bind :p2 <== 'Demo Company' (size 12/13/0, ptype 4, otype 1)
bind :p3 <== '16/Aug/2004:15:06:15' (type 0)
bind :p3 <== '16/Aug/2004:15:06:15' (size 20/21/0, ptype 4, otype 1)
bind :p4 <== '/index.jhtml' (type 0)
bind :p4 <== '/index.jhtml' (size 12/13/0, ptype 4, otype 1)
bind :p5 <== 'demo1' (type 0)
bind :p5 <== 'demo1' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- execute= undef at DBI.pm line 1428
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- do= undef at test4.pl line 34
1 -> FETCH for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'ParamValues')
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
1 <- FETCH= undef at test4.pl line 34
-> DESTROY for DBD::Oracle::st (DBI::st=HASH(0x5f43f4)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY= undef at test4.pl line 34
-> do for DBD::Oracle::db (DBI::db=HASH(0x38ec74)~0x3c7e78 'INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef 'test.com' 'Demo Company' '16/Aug/2004:15:06:54' '/index.jhtml' 'demo1')
1 -> prepare for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef)
dbd_preparse scanned 5 distinct placeholders
1 <- prepare= DBI::st=HASH(0x5f5cc8) at DBI.pm line 1427
-> execute for DBD::Oracle::st (DBI::st=HASH(0x5f5cc8)~0x5f4358 'test.com' 'Demo Company' '16/Aug/2004:15:06:54' '/index.jhtml' 'demo1')
bind :p1 <== 'test.com' (type 0)
bind :p1 <== 'test.com' (size 8/9/0, ptype 4, otype 1)
bind :p2 <== 'Demo Company' (type 0)
bind :p2 <== 'Demo Company' (size 12/13/0, ptype 4, otype 1)
bind :p3 <== '16/Aug/2004:15:06:54' (type 0)
bind :p3 <== '16/Aug/2004:15:06:54' (size 20/21/0, ptype 4, otype 1)
bind :p4 <== '/index.jhtml' (type 0)
bind :p4 <== '/index.jhtml' (size 12/13/0, ptype 4, otype 1)
bind :p5 <== 'demo1' (type 0)
bind :p5 <== 'demo1' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- execute= undef at DBI.pm line 1428
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- do= undef at test4.pl line 34
1 -> FETCH for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'ParamValues')
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
1 <- FETCH= undef at test4.pl line 34
-> DESTROY for DBD::Oracle::st (DBI::st=HASH(0x5f4358)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY= undef at test4.pl line 34
-> disconnect for DBD::CSV::db (DBI::db=HASH(0x3c7744)~0x20737c)
1 -> STORE in DBD::File::db for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'Active' 0)
1 <- STORE= 1 at CSV.pm line 106
<- disconnect= 1 at test4.pl line 37
-> DESTROY for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY= undef
-> DESTROY in DBD::File::st for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER)
<- DESTROY= undef
-> DESTROY for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER)
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'Active' 0)
<- STORE= 1 at CSV.pm line 101
<- DESTROY= undef
-- DBI::END
-> disconnect_all for DBD::Oracle::dr (DBI::dr=HASH(0x207480)~0x3f05b8)
<- disconnect_all= (not implemented) at DBI.pm line 674
-> disconnect_all in DBD::File::dr for DBD::CSV::dr (DBI::dr=HASH(0x1b6268)~0x3c7750)
<- disconnect_all= undef at DBI.pm line 674
! -> DESTROY for DBD::Oracle::dr (DBI::dr=HASH(0x3f05b8)~INNER)
! <- DESTROY= (not implemented) during global destruction
! -> DESTROY in DBD::File::dr for DBD::CSV::dr (DBI::dr=HASH(0x3c7750)~INNER)
! <- DESTROY= undef during global destruction
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
--0-67239641-1096565009=:8887--
RE: DBD-Oracle
am 30.09.2004 19:44:19 von Ron.Reidy
I'm no expert on DBD::CSV, but it looks like the ordering of your =
columns in your select list is not mapping correctly to the format of =
your input file. The key to this is located in the DBI trace log. Look =
for "[Ron Reidy]" below:
-----------------
Ron Reidy
Lead DBA
Array BioPharma, Inc.
-----Original Message-----
From: Robert [mailto:rgoud@yahoo.com]
Sent: Thursday, September 30, 2004 11:23 AM
To: DBI-Users
Subject: DBD-Oracle
Hi list, I am trying to load the following data into Oracle table which =
has a date column
bash-2.03$ cat processed.csv
test.com|16/Aug/2004:15:06:14|/index.html|demo1|Demo Company|
test.com|16/Aug/2004:15:06:15|/index.jhtml|demo1|Demo Company|
test.com|16/Aug/2004:15:06:54|/index.jhtml|demo1|Demo Company|
Here is my code ....
#!/usr/bin/perl -w
use DBI;
use strict;
use DBI qw(:sql_types);
DBI->trace( 2, 'dbitrace.log' );
=20
my $dbh1 =3D DBI->connect("DBI:CSV:");
$dbh1->{'csv_tables'}->{'processed'} =3D {
'eol' =3D> "\n",
'sep_char' =3D> "|",
'quote_char' =3D> undef,
'escape_char' =3D> undef,
'file' =3D> '/home/user1/reports/processed.csv',
'col_names' =3D> ["hostname", "datetime", "url","username", "company"]
};
my $dbh2 =3D DBI->connect("dbi:Oracle:db1", "report", "report" ) or die =
"Can't make 2nd database connect: $DBI::errstr\n";
=20
my($hostname, $url, $username, $company, $datetime);
#my($hostname, $url, $username, $company);
#$sel1->bind_columns(undef, \$hostname, \$datetime, \$url, \$username, =
\$company);
my $sel1 =3D $dbh1->prepare("SELECT =
hostname,datetime,url,username,company FROM processed");
$sel1->execute();
my $array_ref =3D $sel1->fetchall_arrayref();
$sel1->bind_columns( undef, \$hostname, \$datetime, \$url, \$username, =
\$company );
foreach my $row (@$array_ref) {
my ($hostname, $url, $username, $company, $datetime) =3D @$row;
$dbh2->do("INSERT INTO webtest (hostname,datetime,url,username,company) =
VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )", undef, =
$hostname, $datetime
, $url, $username, $company );
}
$dbh1->disconnect();
When I execute the perl code I am getting the following errors
bash-2.03$ perl test4.pl
DBD::Oracle::db do failed: ORA-01858: a non-numeric character was found =
where a numeric was expected (DBD ERROR: OCIStmtExecute) [for Statement =
"INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( =
?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )"] at test4.pl line 34.
DBD::Oracle::db do failed: ORA-01858: a non-numeric character was found =
where a numeric was expected (DBD ERROR: OCIStmtExecute) [for Statement =
"INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( =
?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )"] at test4.pl line 34.
DBD::Oracle::db do failed: ORA-01858: a non-numeric character was found =
where a numeric was expected (DBD ERROR: OCIStmtExecute) [for Statement =
"INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( =
?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )"] at test4.pl line 34.
Here is the table information
SQL> desc webtest
Name Null? Type
----------------------------------------- -------- =
----------------------------
HOSTNAME VARCHAR2(100)
DATETIME DATE
URL VARCHAR2(1000)
USERNAME VARCHAR2(20)
COMPANY VARCHAR2(100)
=20
Here is the dbitrace log, please let me know the problem.
bash-2.03$ cat dbitrace.log
DBI 1.43-nothread default trace level set to 0x0/2 (pid 3648)
-> DBI->connect(DBI:CSV:, , ****)
-> DBI->install_driver(CSV) for solaris perl=3D5.006001 pid=3D3648 =
ruid=3D501 euid=3D501
install_driver: DBD::CSV version 0.21 loaded from =
/usr/local/lib/perl5/site_perl/5.6.1/DBD/CSV.pm
<- install_driver=3D DBI::dr=3DHASH(0x1b6268)
-> default_user in DBD::_::dr for DBD::CSV::dr =
(DBI::dr=3DHASH(0x1b6268)~0x3c7750 undef undef HASH(0x18ded8))
<- default_user=3D ( undef undef ) [2 items] at DBI.pm line 577
-> connect for DBD::CSV::dr (DBI::dr=3DHASH(0x1b6268)~0x3c7750 '' undef =
**** HASH(0x207388))
-> STORE in DBD::File::db for DBD::CSV::db =
(DBI::db=3DHASH(0x20737c)~INNER 'f_dir' '.')
<- STORE=3D 1 at File.pm line 75
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER =
'f_valid_attrs' HASH(0x2073dc))
<- STORE=3D 1 at File.pm line 89
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER =
'sql_valid_attrs' HASH(0x20751c))
<- STORE=3D 1 at File.pm line 94
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x3c7744)~0x20737c 'Active' 1)
<- STORE=3D 1 at File.pm line 100
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'f_version' =
'0.31')
<- STORE=3D 1 at File.pm line 106
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER =
'sql_nano_version' '0.01')
<- STORE=3D 1 at File.pm line 108
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER =
'sql_statement_version' '1.09')
<- STORE=3D 1 at File.pm line 108
<> FETCH=3D '1.09' ('sql_statement_version' from cache) at File.pm line =
110
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'sql_handler' =
'SQL::Statement')
<- STORE=3D 1 at File.pm line 110
-> FETCH in DBD::File::db for DBD::CSV::db =
(DBI::db=3DHASH(0x20737c)~INNER 'csv_tables')
<- FETCH=3D undef at CSV.pm line 74
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'csv_tables' =
HASH(0x207570))
<- STORE=3D 1 at CSV.pm line 74
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'Active' 1)
<- STORE=3D 1 at CSV.pm line 75
<- connect=3D DBI::db=3DHASH(0x3c7744) at DBI.pm line 595
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'PrintError' =
1)
<- STORE=3D 1 at DBI.pm line 642
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'AutoCommit' =
1)
<- STORE=3D 1 at DBI.pm line 642
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'Username' =
undef)
<- STORE=3D 1 at DBI.pm line 645
<> FETCH=3D undef ('Username' from cache) at DBI.pm line 645
<- connect=3D DBI::db=3DHASH(0x3c7744)
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER =
'dbi_connect_closure' CODE(0x3c77d4))
<- STORE=3D 1 at DBI.pm line 665
<> FETCH=3D HASH(0x207570)0keys ('csv_tables' from cache) at test4.pl =
line 9
-> DBI->connect(dbi:Oracle:db1, report, ****)
-> DBI->install_driver(Oracle) for solaris perl=3D5.006001 pid=3D3648 =
ruid=3D501 euid=3D501
install_driver: DBD::Oracle version 1.14 loaded from =
/usr/local/lib/perl5/site_perl/5.6.1/sun4-solaris/DBD/Oracle .pm
-> STORE in DBD::_::common for DBD::Oracle::dr =
(DBI::dr=3DHASH(0x207480)~0x3f05b8 'ShowErrorStatement' 1)
<- STORE=3D 1 at Oracle.pm line 64
<- install_driver=3D DBI::dr=3DHASH(0x207480)
-> connect for DBD::Oracle::dr (DBI::dr=3DHASH(0x207480)~0x3f05b8 'db1' =
'report' **** HASH(0x3c7e48))
<- connect=3D DBI::db=3DHASH(0x38ec74) at DBI.pm line 595
-> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER =
'PrintError' 1)
<- STORE=3D 1 at DBI.pm line 642
-> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER =
'AutoCommit' 1)
<- STORE=3D 1 at DBI.pm line 642
-> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER 'Username' =
'report')
<- STORE=3D 1 at DBI.pm line 645
<> FETCH=3D 'report' ('Username' from cache) at DBI.pm line 645
<- connect=3D DBI::db=3DHASH(0x38ec74)
-> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER =
'dbi_connect_closure' CODE(0x3cea8c))
<- STORE=3D 1 at DBI.pm line 665
-> prepare in DBD::File::db for DBD::CSV::db =
(DBI::db=3DHASH(0x3c7744)~0x20737c 'SELECT =
hostname,datetime,url,username,company FROM processed')
<> FETCH=3D 'DBD::CSV::st' ('ImplementorClass' from cache) at File.pm =
line 162
1 -> csv_cache_sql_parser_object for DBD::CSV::db =
(DBI::db=3DHASH(0x20737c)~INNER)
2 -> FETCH in DBD::File::db for DBD::CSV::db =
(DBI::db=3DHASH(0x20737c)~INNER 'RaiseError')
2 <- FETCH=3D ( '' ) [1 items] at CSV.pm line 87
2 -> FETCH for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER =
'PrintError')
2 <- FETCH=3D ( 1 ) [1 items] at CSV.pm line 87
2 -> FETCH for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'csv_sql')
2 <- FETCH=3D undef at CSV.pm line 92
1 <- csv_cache_sql_parser_object=3D SQL::Parser=3DHASH(0x5fc118) at =
File.pm line 174
-> STORE in DBD::File::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7f20)~0x3c7e3c 'f_stmt' =
DBD::CSV::Statement=3DHASH(0x5fbddc))
<- STORE=3D 1 at File.pm line 189
-> STORE for DBD::CSV::st (DBI::st=3DHASH(0x3c7f20)~0x3c7e3c 'f_params' =
ARRAY(0x5f22d4))
<- STORE=3D 1 at File.pm line 190
-> STORE for DBD::CSV::st (DBI::st=3DHASH(0x3c7f20)~0x3c7e3c =
'NUM_OF_PARAMS' 0)
<- STORE=3D 1 at File.pm line 191
<- prepare=3D DBI::st=3DHASH(0x3c7f20) at test4.pl line 25
-> execute in DBD::File::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7f20)~0x3c7e3c)
1 -> FETCH in DBD::File::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7e3c)~INNER 'NUM_OF_FIELDS')
1 <- FETCH=3D undef at File.pm line 435
1 -> STORE for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER =
'NUM_OF_FIELDS' 5)
1 <- STORE=3D 1 at File.pm line 435
<- execute=3D 3 at test4.pl line 26
-> fetchall_arrayref in DBD::_::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7f20)~0x3c7e3c)
1 -> fetch in DBD::File::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7e3c)~INNER)
2 -> FETCH for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER =
'ChopBlanks')
2 <- FETCH=3D '' at File.pm line 457
1 <- fetch=3D [ 'test.com' '16/Aug/2004:15:06:14' '/index.html' 'demo1' =
'Demo Company' ] row1 at DBI.pm line 1825
1 -> fetch for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER)
2 -> FETCH for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER =
'ChopBlanks')
2 <- FETCH=3D '' at File.pm line 457
1 <- fetch=3D [ 'test.com' '16/Aug/2004:15:06:15' '/index.jhtml' 'demo1' =
'Demo Company' ] row2 at DBI.pm line 1825
1 -> fetch for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER)
2 -> FETCH for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER =
'ChopBlanks')
2 <- FETCH=3D '' at File.pm line 457
1 <- fetch=3D [ 'test.com' '16/Aug/2004:15:06:54' '/index.jhtml' 'demo1' =
'Demo Company' ] row3 at DBI.pm line 1825
1 -> fetch for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER)
1 <- fetch=3D undef row3 at DBI.pm line 1825
<- fetchall_arrayref=3D [ ARRAY(0x5f28d0) ARRAY(0x5f4208) =
ARRAY(0x5f425c) ] row3 at test4.pl line 28
-> bind_columns in DBD::_::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7f20)~0x3c7e3c undef SCALAR(0x16eab0) =
SCALAR(0x16ea50) SCALAR(0x16eaa4) SCALAR(0x16ea80) SCALAR(0x16ea68))
1 <> FETCH=3D 5 ('NUM_OF_FIELDS' from cache) at DBI.pm line 1695
1 -> bind_col in DBD::_::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7e3c)~INNER 1 SCALAR(0x16eab0) undef)
1 <- bind_col=3D 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER 2 =
SCALAR(0x16ea50) undef)
1 <- bind_col=3D 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER 3 =
SCALAR(0x16eaa4) undef)
1 <- bind_col=3D 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER 4 =
SCALAR(0x16ea80) undef)
1 <- bind_col=3D 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER 5 =
SCALAR(0x16ea68) undef)
1 <- bind_col=3D 1 at DBI.pm line 1708
<- bind_columns=3D 1 at test4.pl line 30
-> do in DBD::_::db for DBD::Oracle::db =
(DBI::db=3DHASH(0x38ec74)~0x3c7e78 'INSERT INTO webtest =
(hostname,datetime,url,username,company) VALUES ( ?, =
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef 'test.com' 'Demo =
Company' '16/Aug/2004:15:06:14' '/index.html' 'demo1')
1 -> prepare for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER 'INSERT =
INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, =
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef)
dbd_preparse scanned 5 distinct placeholders
1 <- prepare=3D DBI::st=3DHASH(0x5fc01c) at DBI.pm line 1427
-> execute for DBD::Oracle::st (DBI::st=3DHASH(0x5fc01c)~0x5f431c =
'test.com' 'Demo Company' '16/Aug/2004:15:06:14' '/index.html' 'demo1')
bind :p1 <== 'test.com' (type 0)
bind :p1 <== 'test.com' (size 8/9/0, ptype 4, otype 1)
bind :p2 <== 'Demo Company' (type 0)
bind :p2 <== 'Demo Company' (size 12/13/0, ptype 4, otype 1)
bind :p3 <== '16/Aug/2004:15:06:14' (type 0)
bind :p3 <== '16/Aug/2004:15:06:14' (size 20/21/0, ptype 4, otype 1)
bind :p4 <== '/index.html' (type 0)
bind :p4 <== '/index.html' (size 11/12/0, ptype 4, otype 1)
bind :p5 <== 'demo1' (type 0)
bind :p5 <== 'demo1' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- execute=3D undef at DBI.pm line 1428
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- do=3D undef at test4.pl line 34
1 -> FETCH for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER =
'ParamValues')
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
1 <- FETCH=3D undef at test4.pl line 34
-> DESTROY for DBD::Oracle::st (DBI::st=3DHASH(0x5f431c)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY=3D undef at test4.pl line 34
-> do for DBD::Oracle::db (DBI::db=3DHASH(0x38ec74)~0x3c7e78 'INSERT =
INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, =
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef 'test.com' 'Demo =
Company' '16/Aug/2004:15:06:15' '/index.jhtml' 'demo1')
1 -> prepare for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER 'INSERT =
INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, =
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef)
dbd_preparse scanned 5 distinct placeholders
1 <- prepare=3D DBI::st=3DHASH(0x5f4364) at DBI.pm line 1427
-> execute for DBD::Oracle::st (DBI::st=3DHASH(0x5f4364)~0x5f43f4 =
'test.com' 'Demo Company' '16/Aug/2004:15:06:15' '/index.jhtml' 'demo1')
bind :p1 <== 'test.com' (type 0)
bind :p1 <== 'test.com' (size 8/9/0, ptype 4, otype 1)
bind :p2 <== 'Demo Company' (type 0)
bind :p2 <== 'Demo Company' (size 12/13/0, ptype 4, otype 1)
bind :p3 <== '16/Aug/2004:15:06:15' (type 0)
bind :p3 <== '16/Aug/2004:15:06:15' (size 20/21/0, ptype 4, otype 1)
bind :p4 <== '/index.jhtml' (type 0)
bind :p4 <== '/index.jhtml' (size 12/13/0, ptype 4, otype 1)
bind :p5 <== 'demo1' (type 0)
bind :p5 <== 'demo1' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- execute=3D undef at DBI.pm line 1428
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- do=3D undef at test4.pl line 34
1 -> FETCH for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER =
'ParamValues')
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
1 <- FETCH=3D undef at test4.pl line 34
-> DESTROY for DBD::Oracle::st (DBI::st=3DHASH(0x5f43f4)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY=3D undef at test4.pl line 34
-> do for DBD::Oracle::db (DBI::db=3DHASH(0x38ec74)~0x3c7e78 'INSERT =
INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, =
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef 'test.com' 'Demo =
Company' '16/Aug/2004:15:06:54' '/index.jhtml' 'demo1')
1 -> prepare for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER 'INSERT =
INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, =
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef)
dbd_preparse scanned 5 distinct placeholders
1 <- prepare=3D DBI::st=3DHASH(0x5f5cc8) at DBI.pm line 1427
-> execute for DBD::Oracle::st (DBI::st=3DHASH(0x5f5cc8)~0x5f4358 =
'test.com' 'Demo Company' '16/Aug/2004:15:06:54' '/index.jhtml' 'demo1')
bind :p1 <== 'test.com' (type 0)
bind :p1 <== 'test.com' (size 8/9/0, ptype 4, otype 1)
bind :p2 <== 'Demo Company' (type 0)
bind :p2 <== 'Demo Company' (size 12/13/0, ptype 4, otype 1)
[Ron Reidy] According to your input data (and how you are binding this =
data), column #2 should be the date/time data. Because this data is not =
numeric, it is throwing the ORA-01858 error.
bind :p3 <== '16/Aug/2004:15:06:54' (type 0)
bind :p3 <== '16/Aug/2004:15:06:54' (size 20/21/0, ptype 4, otype 1)
bind :p4 <== '/index.jhtml' (type 0)
bind :p4 <== '/index.jhtml' (size 12/13/0, ptype 4, otype 1)
bind :p5 <== 'demo1' (type 0)
bind :p5 <== 'demo1' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- execute=3D undef at DBI.pm line 1428
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- do=3D undef at test4.pl line 34
1 -> FETCH for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER =
'ParamValues')
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
1 <- FETCH=3D undef at test4.pl line 34
-> DESTROY for DBD::Oracle::st (DBI::st=3DHASH(0x5f4358)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY=3D undef at test4.pl line 34
-> disconnect for DBD::CSV::db (DBI::db=3DHASH(0x3c7744)~0x20737c)
1 -> STORE in DBD::File::db for DBD::CSV::db =
(DBI::db=3DHASH(0x20737c)~INNER 'Active' 0)
1 <- STORE=3D 1 at CSV.pm line 106
<- disconnect=3D 1 at test4.pl line 37
-> DESTROY for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY=3D undef
-> DESTROY in DBD::File::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7e3c)~INNER)
<- DESTROY=3D undef
-> DESTROY for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER)
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'Active' 0)
<- STORE=3D 1 at CSV.pm line 101
<- DESTROY=3D undef
-- DBI::END
-> disconnect_all for DBD::Oracle::dr =
(DBI::dr=3DHASH(0x207480)~0x3f05b8)
<- disconnect_all=3D (not implemented) at DBI.pm line 674
-> disconnect_all in DBD::File::dr for DBD::CSV::dr =
(DBI::dr=3DHASH(0x1b6268)~0x3c7750)
<- disconnect_all=3D undef at DBI.pm line 674
! -> DESTROY for DBD::Oracle::dr (DBI::dr=3DHASH(0x3f05b8)~INNER)
! <- DESTROY=3D (not implemented) during global destruction
! -> DESTROY in DBD::File::dr for DBD::CSV::dr =
(DBI::dr=3DHASH(0x3c7750)~INNER)
! <- DESTROY=3D undef during global destruction
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around=20
http://mail.yahoo.com=20
This electronic message transmission is a PRIVATE communication which =
contains
information which may be confidential or privileged. The information is =
intended=20
to be for the use of the individual or entity named above. If you are =
not the=20
intended recipient, please be aware that any disclosure, copying, =
distribution=20
or use of the contents of this information is prohibited. Please notify =
the
sender of the delivery error by replying to this message, or notify us =
by
telephone (877-633-2436, ext. 0), and then delete it from your system.
RE: DBD-Oracle
am 30.09.2004 20:20:48 von rgoud
--0-85747713-1096568448=:35892
Content-Type: text/plain; charset=us-ascii
Changing the order did not help, I am still getting same error.
"Reidy, Ron" wrote:I'm no expert on DBD::CSV, but it looks like the ordering of your columns in your select list is not mapping correctly to the format of your input file. The key to this is located in the DBI trace log. Look for "[Ron Reidy]" below:
-----------------
Ron Reidy
Lead DBA
Array BioPharma, Inc.
-----Original Message-----
From: Robert [mailto:rgoud@yahoo.com]
Sent: Thursday, September 30, 2004 11:23 AM
To: DBI-Users
Subject: DBD-Oracle
Hi list, I am trying to load the following data into Oracle table which has a date column
bash-2.03$ cat processed.csv
test.com|16/Aug/2004:15:06:14|/index.html|demo1|Demo Company|
test.com|16/Aug/2004:15:06:15|/index.jhtml|demo1|Demo Company|
test.com|16/Aug/2004:15:06:54|/index.jhtml|demo1|Demo Company|
Here is my code ....
#!/usr/bin/perl -w
use DBI;
use strict;
use DBI qw(:sql_types);
DBI->trace( 2, 'dbitrace.log' );
my $dbh1 = DBI->connect("DBI:CSV:");
$dbh1->{'csv_tables'}->{'processed'} = {
'eol' => "\n",
'sep_char' => "|",
'quote_char' => undef,
'escape_char' => undef,
'file' => '/home/user1/reports/processed.csv',
'col_names' => ["hostname", "datetime", "url","username", "company"]
};
my $dbh2 = DBI->connect("dbi:Oracle:db1", "report", "report" ) or die "Can't make 2nd database connect: $DBI::errstr\n";
my($hostname, $url, $username, $company, $datetime);
#my($hostname, $url, $username, $company);
#$sel1->bind_columns(undef, \$hostname, \$datetime, \$url, \$username, \$company);
my $sel1 = $dbh1->prepare("SELECT hostname,datetime,url,username,company FROM processed");
$sel1->execute();
my $array_ref = $sel1->fetchall_arrayref();
$sel1->bind_columns( undef, \$hostname, \$datetime, \$url, \$username, \$company );
foreach my $row (@$array_ref) {
my ($hostname, $url, $username, $company, $datetime) = @$row;
$dbh2->do("INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )", undef, $hostname, $datetime
, $url, $username, $company );
}
$dbh1->disconnect();
When I execute the perl code I am getting the following errors
bash-2.03$ perl test4.pl
DBD::Oracle::db do failed: ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute) [for Statement "INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )"] at test4.pl line 34.
DBD::Oracle::db do failed: ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute) [for Statement "INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )"] at test4.pl line 34.
DBD::Oracle::db do failed: ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute) [for Statement "INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )"] at test4.pl line 34.
Here is the table information
SQL> desc webtest
Name Null? Type
----------------------------------------- -------- ----------------------------
HOSTNAME VARCHAR2(100)
DATETIME DATE
URL VARCHAR2(1000)
USERNAME VARCHAR2(20)
COMPANY VARCHAR2(100)
Here is the dbitrace log, please let me know the problem.
bash-2.03$ cat dbitrace.log
DBI 1.43-nothread default trace level set to 0x0/2 (pid 3648)
-> DBI->connect(DBI:CSV:, , ****)
-> DBI->install_driver(CSV) for solaris perl=5.006001 pid=3648 ruid=501 euid=501
install_driver: DBD::CSV version 0.21 loaded from /usr/local/lib/perl5/site_perl/5.6.1/DBD/CSV.pm
<- install_driver= DBI::dr=HASH(0x1b6268)
-> default_user in DBD::_::dr for DBD::CSV::dr (DBI::dr=HASH(0x1b6268)~0x3c7750 undef undef HASH(0x18ded8))
<- default_user= ( undef undef ) [2 items] at DBI.pm line 577
-> connect for DBD::CSV::dr (DBI::dr=HASH(0x1b6268)~0x3c7750 '' undef **** HASH(0x207388))
-> STORE in DBD::File::db for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'f_dir' '.')
<- STORE= 1 at File.pm line 75
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'f_valid_attrs' HASH(0x2073dc))
<- STORE= 1 at File.pm line 89
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'sql_valid_attrs' HASH(0x20751c))
<- STORE= 1 at File.pm line 94
-> STORE for DBD::CSV::db (DBI::db=HASH(0x3c7744)~0x20737c 'Active' 1)
<- STORE= 1 at File.pm line 100
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'f_version' '0.31')
<- STORE= 1 at File.pm line 106
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'sql_nano_version' '0.01')
<- STORE= 1 at File.pm line 108
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'sql_statement_version' '1.09')
<- STORE= 1 at File.pm line 108
<> FETCH= '1.09' ('sql_statement_version' from cache) at File.pm line 110
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'sql_handler' 'SQL::Statement')
<- STORE= 1 at File.pm line 110
-> FETCH in DBD::File::db for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'csv_tables')
<- FETCH= undef at CSV.pm line 74
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'csv_tables' HASH(0x207570))
<- STORE= 1 at CSV.pm line 74
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'Active' 1)
<- STORE= 1 at CSV.pm line 75
<- connect= DBI::db=HASH(0x3c7744) at DBI.pm line 595
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'PrintError' 1)
<- STORE= 1 at DBI.pm line 642
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'AutoCommit' 1)
<- STORE= 1 at DBI.pm line 642
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'Username' undef)
<- STORE= 1 at DBI.pm line 645
<> FETCH= undef ('Username' from cache) at DBI.pm line 645
<- connect= DBI::db=HASH(0x3c7744)
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'dbi_connect_closure' CODE(0x3c77d4))
<- STORE= 1 at DBI.pm line 665
<> FETCH= HASH(0x207570)0keys ('csv_tables' from cache) at test4.pl line 9
-> DBI->connect(dbi:Oracle:db1, report, ****)
-> DBI->install_driver(Oracle) for solaris perl=5.006001 pid=3648 ruid=501 euid=501
install_driver: DBD::Oracle version 1.14 loaded from /usr/local/lib/perl5/site_perl/5.6.1/sun4-solaris/DBD/Oracle .pm
-> STORE in DBD::_::common for DBD::Oracle::dr (DBI::dr=HASH(0x207480)~0x3f05b8 'ShowErrorStatement' 1)
<- STORE= 1 at Oracle.pm line 64
<- install_driver= DBI::dr=HASH(0x207480)
-> connect for DBD::Oracle::dr (DBI::dr=HASH(0x207480)~0x3f05b8 'db1' 'report' **** HASH(0x3c7e48))
<- connect= DBI::db=HASH(0x38ec74) at DBI.pm line 595
-> STORE for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'PrintError' 1)
<- STORE= 1 at DBI.pm line 642
-> STORE for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'AutoCommit' 1)
<- STORE= 1 at DBI.pm line 642
-> STORE for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'Username' 'report')
<- STORE= 1 at DBI.pm line 645
<> FETCH= 'report' ('Username' from cache) at DBI.pm line 645
<- connect= DBI::db=HASH(0x38ec74)
-> STORE for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'dbi_connect_closure' CODE(0x3cea8c))
<- STORE= 1 at DBI.pm line 665
-> prepare in DBD::File::db for DBD::CSV::db (DBI::db=HASH(0x3c7744)~0x20737c 'SELECT hostname,datetime,url,username,company FROM processed')
<> FETCH= 'DBD::CSV::st' ('ImplementorClass' from cache) at File.pm line 162
1 -> csv_cache_sql_parser_object for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER)
2 -> FETCH in DBD::File::db for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'RaiseError')
2 <- FETCH= ( '' ) [1 items] at CSV.pm line 87
2 -> FETCH for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'PrintError')
2 <- FETCH= ( 1 ) [1 items] at CSV.pm line 87
2 -> FETCH for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'csv_sql')
2 <- FETCH= undef at CSV.pm line 92
1 <- csv_cache_sql_parser_object= SQL::Parser=HASH(0x5fc118) at File.pm line 174
-> STORE in DBD::File::st for DBD::CSV::st (DBI::st=HASH(0x3c7f20)~0x3c7e3c 'f_stmt' DBD::CSV::Statement=HASH(0x5fbddc))
<- STORE= 1 at File.pm line 189
-> STORE for DBD::CSV::st (DBI::st=HASH(0x3c7f20)~0x3c7e3c 'f_params' ARRAY(0x5f22d4))
<- STORE= 1 at File.pm line 190
-> STORE for DBD::CSV::st (DBI::st=HASH(0x3c7f20)~0x3c7e3c 'NUM_OF_PARAMS' 0)
<- STORE= 1 at File.pm line 191
<- prepare= DBI::st=HASH(0x3c7f20) at test4.pl line 25
-> execute in DBD::File::st for DBD::CSV::st (DBI::st=HASH(0x3c7f20)~0x3c7e3c)
1 -> FETCH in DBD::File::st for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 'NUM_OF_FIELDS')
1 <- FETCH= undef at File.pm line 435
1 -> STORE for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 'NUM_OF_FIELDS' 5)
1 <- STORE= 1 at File.pm line 435
<- execute= 3 at test4.pl line 26
-> fetchall_arrayref in DBD::_::st for DBD::CSV::st (DBI::st=HASH(0x3c7f20)~0x3c7e3c)
1 -> fetch in DBD::File::st for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER)
2 -> FETCH for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 'ChopBlanks')
2 <- FETCH= '' at File.pm line 457
1 <- fetch= [ 'test.com' '16/Aug/2004:15:06:14' '/index.html' 'demo1' 'Demo Company' ] row1 at DBI.pm line 1825
1 -> fetch for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER)
2 -> FETCH for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 'ChopBlanks')
2 <- FETCH= '' at File.pm line 457
1 <- fetch= [ 'test.com' '16/Aug/2004:15:06:15' '/index.jhtml' 'demo1' 'Demo Company' ] row2 at DBI.pm line 1825
1 -> fetch for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER)
2 -> FETCH for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 'ChopBlanks')
2 <- FETCH= '' at File.pm line 457
1 <- fetch= [ 'test.com' '16/Aug/2004:15:06:54' '/index.jhtml' 'demo1' 'Demo Company' ] row3 at DBI.pm line 1825
1 -> fetch for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER)
1 <- fetch= undef row3 at DBI.pm line 1825
<- fetchall_arrayref= [ ARRAY(0x5f28d0) ARRAY(0x5f4208) ARRAY(0x5f425c) ] row3 at test4.pl line 28
-> bind_columns in DBD::_::st for DBD::CSV::st (DBI::st=HASH(0x3c7f20)~0x3c7e3c undef SCALAR(0x16eab0) SCALAR(0x16ea50) SCALAR(0x16eaa4) SCALAR(0x16ea80) SCALAR(0x16ea68))
1 <> FETCH= 5 ('NUM_OF_FIELDS' from cache) at DBI.pm line 1695
1 -> bind_col in DBD::_::st for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 1 SCALAR(0x16eab0) undef)
1 <- bind_col= 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 2 SCALAR(0x16ea50) undef)
1 <- bind_col= 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 3 SCALAR(0x16eaa4) undef)
1 <- bind_col= 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 4 SCALAR(0x16ea80) undef)
1 <- bind_col= 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 5 SCALAR(0x16ea68) undef)
1 <- bind_col= 1 at DBI.pm line 1708
<- bind_columns= 1 at test4.pl line 30
-> do in DBD::_::db for DBD::Oracle::db (DBI::db=HASH(0x38ec74)~0x3c7e78 'INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef 'test.com' 'Demo Company' '16/Aug/2004:15:06:14' '/index.html' 'demo1')
1 -> prepare for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef)
dbd_preparse scanned 5 distinct placeholders
1 <- prepare= DBI::st=HASH(0x5fc01c) at DBI.pm line 1427
-> execute for DBD::Oracle::st (DBI::st=HASH(0x5fc01c)~0x5f431c 'test.com' 'Demo Company' '16/Aug/2004:15:06:14' '/index.html' 'demo1')
bind :p1 <== 'test.com' (type 0)
bind :p1 <== 'test.com' (size 8/9/0, ptype 4, otype 1)
bind :p2 <== 'Demo Company' (type 0)
bind :p2 <== 'Demo Company' (size 12/13/0, ptype 4, otype 1)
bind :p3 <== '16/Aug/2004:15:06:14' (type 0)
bind :p3 <== '16/Aug/2004:15:06:14' (size 20/21/0, ptype 4, otype 1)
bind :p4 <== '/index.html' (type 0)
bind :p4 <== '/index.html' (size 11/12/0, ptype 4, otype 1)
bind :p5 <== 'demo1' (type 0)
bind :p5 <== 'demo1' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- execute= undef at DBI.pm line 1428
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- do= undef at test4.pl line 34
1 -> FETCH for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'ParamValues')
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
1 <- FETCH= undef at test4.pl line 34
-> DESTROY for DBD::Oracle::st (DBI::st=HASH(0x5f431c)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY= undef at test4.pl line 34
-> do for DBD::Oracle::db (DBI::db=HASH(0x38ec74)~0x3c7e78 'INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef 'test.com' 'Demo Company' '16/Aug/2004:15:06:15' '/index.jhtml' 'demo1')
1 -> prepare for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef)
dbd_preparse scanned 5 distinct placeholders
1 <- prepare= DBI::st=HASH(0x5f4364) at DBI.pm line 1427
-> execute for DBD::Oracle::st (DBI::st=HASH(0x5f4364)~0x5f43f4 'test.com' 'Demo Company' '16/Aug/2004:15:06:15' '/index.jhtml' 'demo1')
bind :p1 <== 'test.com' (type 0)
bind :p1 <== 'test.com' (size 8/9/0, ptype 4, otype 1)
bind :p2 <== 'Demo Company' (type 0)
bind :p2 <== 'Demo Company' (size 12/13/0, ptype 4, otype 1)
bind :p3 <== '16/Aug/2004:15:06:15' (type 0)
bind :p3 <== '16/Aug/2004:15:06:15' (size 20/21/0, ptype 4, otype 1)
bind :p4 <== '/index.jhtml' (type 0)
bind :p4 <== '/index.jhtml' (size 12/13/0, ptype 4, otype 1)
bind :p5 <== 'demo1' (type 0)
bind :p5 <== 'demo1' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- execute= undef at DBI.pm line 1428
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- do= undef at test4.pl line 34
1 -> FETCH for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'ParamValues')
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
1 <- FETCH= undef at test4.pl line 34
-> DESTROY for DBD::Oracle::st (DBI::st=HASH(0x5f43f4)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY= undef at test4.pl line 34
-> do for DBD::Oracle::db (DBI::db=HASH(0x38ec74)~0x3c7e78 'INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef 'test.com' 'Demo Company' '16/Aug/2004:15:06:54' '/index.jhtml' 'demo1')
1 -> prepare for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef)
dbd_preparse scanned 5 distinct placeholders
1 <- prepare= DBI::st=HASH(0x5f5cc8) at DBI.pm line 1427
-> execute for DBD::Oracle::st (DBI::st=HASH(0x5f5cc8)~0x5f4358 'test.com' 'Demo Company' '16/Aug/2004:15:06:54' '/index.jhtml' 'demo1')
bind :p1 <== 'test.com' (type 0)
bind :p1 <== 'test.com' (size 8/9/0, ptype 4, otype 1)
bind :p2 <== 'Demo Company' (type 0)
bind :p2 <== 'Demo Company' (size 12/13/0, ptype 4, otype 1)
[Ron Reidy] According to your input data (and how you are binding this data), column #2 should be the date/time data. Because this data is not numeric, it is throwing the ORA-01858 error.
bind :p3 <== '16/Aug/2004:15:06:54' (type 0)
bind :p3 <== '16/Aug/2004:15:06:54' (size 20/21/0, ptype 4, otype 1)
bind :p4 <== '/index.jhtml' (type 0)
bind :p4 <== '/index.jhtml' (size 12/13/0, ptype 4, otype 1)
bind :p5 <== 'demo1' (type 0)
bind :p5 <== 'demo1' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- execute= undef at DBI.pm line 1428
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- do= undef at test4.pl line 34
1 -> FETCH for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'ParamValues')
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
1 <- FETCH= undef at test4.pl line 34
-> DESTROY for DBD::Oracle::st (DBI::st=HASH(0x5f4358)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY= undef at test4.pl line 34
-> disconnect for DBD::CSV::db (DBI::db=HASH(0x3c7744)~0x20737c)
1 -> STORE in DBD::File::db for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'Active' 0)
1 <- STORE= 1 at CSV.pm line 106
<- disconnect= 1 at test4.pl line 37
-> DESTROY for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY= undef
-> DESTROY in DBD::File::st for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER)
<- DESTROY= undef
-> DESTROY for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER)
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'Active' 0)
<- STORE= 1 at CSV.pm line 101
<- DESTROY= undef
-- DBI::END
-> disconnect_all for DBD::Oracle::dr (DBI::dr=HASH(0x207480)~0x3f05b8)
<- disconnect_all= (not implemented) at DBI.pm line 674
-> disconnect_all in DBD::File::dr for DBD::CSV::dr (DBI::dr=HASH(0x1b6268)~0x3c7750)
<- disconnect_all= undef at DBI.pm line 674
! -> DESTROY for DBD::Oracle::dr (DBI::dr=HASH(0x3f05b8)~INNER)
! <- DESTROY= (not implemented) during global destruction
! -> DESTROY in DBD::File::dr for DBD::CSV::dr (DBI::dr=HASH(0x3c7750)~INNER)
! <- DESTROY= undef during global destruction
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
This electronic message transmission is a PRIVATE communication which contains
information which may be confidential or privileged. The information is intended
to be for the use of the individual or entity named above. If you are not the
intended recipient, please be aware that any disclosure, copying, distribution
or use of the contents of this information is prohibited. Please notify the
sender of the delivery error by replying to this message, or notify us by
telephone (877-633-2436, ext. 0), and then delete it from your system.
---------------------------------
Do you Yahoo!?
New and Improved Yahoo! Mail - Send 10MB messages!
--0-85747713-1096568448=:35892--
RE: DBD-Oracle
am 30.09.2004 20:42:44 von Ron.Reidy
------_=_NextPart_001_01C4A71D.4629C810
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Is the binding happeneing in the same manner?
=20
-----------------=20
Ron Reidy=20
Lead DBA=20
Array BioPharma, Inc.=20
-----Original Message-----
From: Robert [mailto:rgoud@yahoo.com]
Sent: Thursday, September 30, 2004 12:21 PM
To: Reidy, Ron; DBI-Users
Subject: RE: DBD-Oracle
Changing the order did not help, I am still getting same error.
"Reidy, Ron" wrote:=20
I'm no expert on DBD::CSV, but it looks like the ordering of your =
columns in your select list is not mapping correctly to the format of =
your input file. The key to this is located in the DBI trace log. Look =
for "[Ron Reidy]" below:
-----------------
Ron Reidy
Lead DBA
Array BioPharma, Inc.
-----Original Message-----
From: Robert [mailto:rgoud@yahoo.com]
Sent: Thursday, September 30, 2004 11:23 AM
To: DBI-Users
Subject: DBD-Oracle
Hi list, I am trying to load the following data into Oracle table which =
has a date column
bash-2.03$ cat processed.csv
test.com|16/Aug/2004:15:06:14|/index.html|demo1|Demo Company|
test.com|16/Aug/2004:15:06:15|/index.jhtml|demo1|Demo Company|
test.com|16/Aug/2004:15:06:54|/index.jhtml|demo1|Demo Company|
Here is my code ....
#!/usr/bin/perl -w
use DBI;
use strict;
use DBI qw(:sql_types);
DBI->trace( 2, 'dbitrace.log' );
my $dbh1 =3D DBI->connect("DBI:CSV:");
$dbh1->{'csv_tables'}->{'processed'} =3D {
'eol' =3D> "\n",
'sep_char' =3D> "|",
'quote_char' =3D> undef,
'escape_char' =3D> undef,
'file' =3D> '/home/user1/reports/processed.csv',
'col_names' =3D> ["hostname", "datetime", "url","username", "company"]
};
my $dbh2 =3D DBI->connect("dbi:Oracle:db1", "report", "report" ) or die =
"Can't make 2nd database connect: $DBI::errstr\n";
my($hostname, $url, $username, $company, $datetime);
#my($hostname, $url, $username, $company);
#$sel1->bind_columns(undef, \$hostname, \$datetime, \$url, \$username, =
\$company);
my $sel1 =3D $dbh1->prepare("SELECT =
hostname,datetime,url,username,company FROM processed");
$sel1->execute();
my $array_ref =3D $sel1->fetchall_arrayref();
$sel1->bind_columns( undef, \$hostname, \$datetime, \$url, \$username, =
\$company );
foreach my $row (@$array_ref) {
my ($hostname, $url, $username, $company, $datetime) =3D @$row;
$dbh2->do("INSERT INTO webtest (hostname,datetime,url,username,company) =
VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )", undef, =
$hostname, $datetime
, $url, $username, $company );
}
$dbh1->disconnect();
When I execute the perl code I am getting the following errors
bash-2.03$ perl test4.pl
DBD::Oracle::db do failed: ORA-01858: a non-numeric character was found =
where a numeric was expected (DBD ERROR: OCIStmtExecute) [for Statement =
"INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( =
?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )"] at test4.pl line 34.
DBD::Oracle::db do failed: ORA-01858: a non-numeric character was found =
where a numeric was expected (! DBD ERROR: OCIStmtExecute) [for =
Statement "INSERT INTO webtest (hostname,datetime,url,username,company) =
VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )"] at test4.pl =
line 34.
DBD::Oracle::db do failed: ORA-01858: a non-numeric character was found =
where a numeric was expected (DBD ERROR: OCIStmtExecute) [for Statement =
"INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( =
?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )"] at test4.pl line 34.
Here is the table information
SQL> desc webtest
Name Null? Type
----------------------------------------- -------- =
----------------------------
HOSTNAME VARCHAR2(100)
DATETIME DATE
URL VARCHAR2(1000)
USERNAME VARCHAR2(20)
COMPANY VARCHAR2(100)
Here is the dbitrace log, please let me know the problem.
bash-2.03$ cat dbitrace.log
DBI 1.43-nothread default trace level set to 0x0/2 (pid 3648)
-> DBI->connect(DBI:CSV:, , ****)
-> DBI->install_driver(CSV) for solaris perl=3D5.006001 pid=3D3648 =
ruid=3D501 euid=3D501
install_driver: DBD::CSV version 0.21 loaded from =
/usr/local/lib/perl5/site_perl/5.6.1/DBD/CSV.pm
<- install_driver=3D DBI::dr=3DHASH(0x1b6268)
-> default_user in DBD::_::dr for DBD::CSV::dr =
(DBI::dr=3DHASH(0x1b6268)~0x3c7750 undef undef HASH(0x18ded8))
<- default_user=3D ( undef undef ) [2 items] at DBI.pm line 577
-> connect for DBD::CSV::dr (DBI::dr=3DHASH(0x1b6268)~0x3c7750 '' undef =
**** HASH(0x207388))
-> STORE in DBD::File::db for DBD::CSV::db =
(DBI::db=3DHASH(0x20737c)~INNER 'f_dir' '.')
<- STORE=3D 1 at File.pm line 75
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER =
'f_valid_attrs' HASH(0x2073dc))
<- STORE=3D 1 at File.pm line 89
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER =
'sql_valid_attrs' HASH(0x20751c))
<- STORE=3D 1 at File.pm line 94
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x3c7744)~0x20737c 'Active' 1)
<- STORE=3D 1 at File.pm line 100
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'f_version' =
'0.31')
<- STORE=3D 1 at File.pm line 106
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER =
'sql_nano_version' '0.01')
<- STORE=3D 1 at File.pm line 108
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER =
'sql_statement_version' '1.09')
<- STORE=3D 1 at File.pm line 108
<> FETCH=3D '1.09' ('sql_statement_version' from cache) at File.pm line =
110
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'sql_handler' =
'SQL::Statement')
<- STORE=3D 1 at File.pm line 110
-> FETCH in DBD::File::db for DBD::CSV::db =
(DBI::db=3DHASH(0x20737c)~INNER 'csv_tables')
<- FETCH=3D undef at CSV.pm line 74
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'csv_tables' =
HASH(0x207570))
<- STORE=3D 1 at CSV.pm line 74
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'Active' 1)
<- STORE=3D 1 at CSV.pm line 75
<- connect=3D DBI::db=3DHASH(0x3c7744) at DBI.pm line 595
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'PrintError' =
1)
<- STORE=3D 1 at DBI.pm line 642
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'AutoCommit' =
1)
<- STORE=3D 1 at DBI.pm line 642
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'Username' =
undef)
<- STORE=3D 1 at DBI.pm line 645
<> FETCH=3D undef ('Username' from cache) at DBI.pm line 645
<- connect=3D DBI::db=3DHASH(0x3c7744)
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER =
'dbi_connect_closure' CODE(0x3c77d4))
<- STORE=3D 1 at DBI.pm line 665
<> FETCH=3D HASH(0x207570)0keys ('csv_tables' from cache) at test4.pl =
line 9
-> DBI->connect(dbi:Oracle:db1, report, ****)
-> DBI->install_driver(Oracle) for solaris perl=3D5.006001 pid=3D3648 =
ruid=3D501 euid=3D501
install_driver: DBD::Oracle version 1.14 loaded from =
/usr/local/lib/perl5/site_perl/5.6.1/sun4-solaris/DBD/Oracle .pm
-> STORE in DBD::_::common for DBD::Oracle::dr =
(DBI::dr=3DHASH(0x207480)~0x3f05b8 'ShowErrorStatement' 1)
<- STORE=3D 1 at Oracle.pm line 64
<- install_driver=3D DBI::dr=3DHASH(0x207480)
-> connect for DBD::Oracle::dr (DBI::dr=3DHASH(0x207480)~0x3f05b8 'db1' =
'report' **** HASH(0x3c7e48))
<- connect=3D DBI::db=3DHASH(0x38ec74) at DBI.pm line 595
-> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER =
'PrintError' 1)
<- STORE=3D 1 at DBI.pm line 642
-> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER =
'AutoCommit' 1)
<- STORE=3D 1 at DBI.pm line 642
-> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER 'Username' =
'report')
<- STORE=3D 1 at DBI.pm line 645
<> FETCH=3D 'report' ('Username' from cache) at DBI.pm line 645
<- connect=3D DBI::db=3DHASH(0x38ec74)
-> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER =
'dbi_connect_closure' CODE(0x3cea8c))
<- STORE=3D 1 at DBI.pm line 665
-> prepare in DBD::File::db for DBD::CSV::db =
(DBI::db=3DHASH(0x3c7744)~0x20737c 'SELECT =
hostname,datetime,url,username,company FROM processed')
<> FETCH=3D 'DBD::CSV::st' ('ImplementorClass' from cache) at File.pm =
line 162
1 -> csv_cache_sql_parser_object for DBD::CSV::db =
(DBI::db=3DHASH(0x20737c)~INNER)
2 -> FETCH in DBD::File::db for DBD::CSV::db =
(DBI::db=3DHASH(0x20737c)~INNER 'RaiseError')
2 <- FETCH=3D ( '' ) [1 items] at CSV.pm line 87
2 -> FETCH for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER =
'PrintError')
2 <- FETCH=3D ( 1 ) [1 items] at CSV.pm line 87
2 -> FETCH for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'csv_sql')
2 <- FETCH=3D undef at CSV.pm line 92
1 <- csv_cache_sql_parser_object=3D SQL::Parser=3DHASH(0x5fc118) at =
File.pm line 174
-> STORE in DBD::File::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7f20)~0x3c7e3c 'f_stmt' =
DBD::CSV::Statement=3DHASH(0x5fbddc))
<- STORE=3D 1 at File.pm line 189
-> STORE for DBD::CSV::st (DBI::st=3DHASH(0x3c7f20)~0x3c7e3c 'f_params' =
ARRAY(0x5f22d4))
<- STORE=3D 1 at File.pm line 190
-> STORE for DBD::CSV::st (DBI::st=3DHASH(0x3c7f20)~0x3c7e3c =
'NUM_OF_PARAMS' 0)
<- STORE=3D 1 at File.pm line 191
<- prepare=3D DBI::st=3DHASH(0x3c7f20) at test4.pl line 25
-> execute in DBD::File::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7f20)~0x3c7e3c)
1 -> FETCH in DBD::File::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7e3c)~INNER 'NUM_OF_FIELDS')
1 <- FETCH=3D undef at File.pm line 435
1 -> STORE for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~IN! NER =
'NUM_OF_FIELDS' 5)
1 <- STORE=3D 1 at File.pm line 435
<- execute=3D 3 at test4.pl line 26
-> fetchall_arrayref in DBD::_::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7f20)~0x3c7e3c)
1 -> fetch in DBD::File::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7e3c)~INNER)
2 -> FETCH for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER =
'ChopBlanks')
2 <- FETCH=3D '' at File.pm line 457
1 <- fetch=3D [ 'test.com' '16/Aug/2004:15:06:14' '/index.html' 'demo1' =
'Demo Company' ] row1 at DBI.pm line 1825
1 -> fetch for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER)
2 -> FETCH for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER =
'ChopBlanks')
2 <- FETCH=3D '' at File.pm line 457
1 <- fetch=3D [ 'test.com' '16/Aug/2004:15:06:15' '/index.jhtml' 'demo1' =
'Demo Company' ] row2 at DBI.pm line 1825
1 -> fetch for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER)
2 -> FETCH for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~! INNER =
'ChopBlanks')
2 <- FETCH=3D '' at File.pm line 457
1 <- fetch=3D [ 'test.com' '16/Aug/2004:15:06:54' '/index.jhtml' 'demo1' =
'Demo Company' ] row3 at DBI.pm line 1825
1 -> fetch for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER)
1 <- fetch=3D undef row3 at DBI.pm line 1825
<- fetchall_arrayref=3D [ ARRAY(0x5f28d0) ARRAY(0x5f4208) =
ARRAY(0x5f425c) ] row3 at test4.pl line 28
-> bind_columns in DBD::_::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7f20)~0x3c7e3c undef SCALAR(0x16eab0) =
SCALAR(0x16ea50) SCALAR(0x16eaa4) SCALAR(0x16ea80) SCALAR(0x16ea68))
1 <> FETCH=3D 5 ('NUM_OF_FIELDS' from cache) at DBI.pm line 1695
1 -> bind_col in DBD::_::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7e3c)~INNER 1 SCALAR(0x16eab0) undef)
1 <- bind_col=3D 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER 2 =
SCALAR(0x16ea50) undef)
1 <- bind_col=3D 1 at DBI.pm line 1708
1 -> ! bind_col for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER 3 =
SCALAR(0x16eaa4) undef)
1 <- bind_col=3D 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER 4 =
SCALAR(0x16ea80) undef)
1 <- bind_col=3D 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER 5 =
SCALAR(0x16ea68) undef)
1 <- bind_col=3D 1 at DBI.pm line 1708
<- bind_columns=3D 1 at test4.pl line 30
-> do in DBD::_::db for DBD::Oracle::db =
(DBI::db=3DHASH(0x38ec74)~0x3c7e78 'INSERT INTO webtest =
(hostname,datetime,url,username,company) VALUES ( ?, =
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef 'test.com' 'Demo =
Company' '16/Aug/2004:15:06:14' '/index.html' 'demo1')
1 -> prepare for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER 'INSERT =
INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, =
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef)
dbd_preparse scanned 5 distinct placeholders
1 <- prepare=3D DBI::st=3DHASH(0x5fc01c) at DBI.pm line 1427
-> execute for DBD::Oracle::st (DBI::st=3DHASH(0x5fc01c)~0x5f431c =
'test.com' 'Demo Company' '16/Aug/2004:15:06:14' '/index.html' 'demo1')
bind :p1 <== 'test.com' (type 0)
bind :p1 <== 'test.com' (size 8/9/0, ptype 4, otype 1)
bind :p2 <== 'Demo Company' (type 0)
bind :p2 <== 'Demo Company' (size 12/13/0, ptype 4, otype 1)
bind :p3 <== '16/Aug/2004:15:06:14' (type 0)
bind :p3 <== '16/Aug/2004:15:06:14' (size 20/21/0, ptype 4, otype 1)
bind :p4 <== '/index.html' (type 0)
bind :p4 <== '/index.html' (size 11/12/0, ptype 4, otype 1)
bind :p5 <== 'demo1' (type 0)
bind :p5 <== 'demo1' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- execute=3D undef at DBI.pm line 1428
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- do=3D undef at test4.pl line 34
1 -> FETCH for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER =
'ParamValues')
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
1 <- FETCH=3D undef at test4.pl line 34
-> DESTROY for DBD::Oracle::st (DBI::st=3DHASH(0x5f431c)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY=3D undef at test4.pl line 34
-> do for DBD::Oracle::db (DBI::db=3DHASH(0x38ec74)~0x3c7e78 'INSERT =
INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, =
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef 'test.com' 'Demo =
Company' '16/Aug/2004:15:06:15' '/index.jhtml' 'demo1')
1 -> prepare for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER 'INSERT =
INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, =
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef)
dbd_preparse scanned 5 distinct placeholders
1 <- prepare=3D DBI::st=3DHASH(0x5f4364) at DBI.pm line 1427
-> execute for DBD::Oracle::st (DBI::st=3DHASH(0x5f4364)~0x5f43f4 =
'test.com' 'Demo Company' '16/Aug/2004:15:06:15' '/index.jhtml' 'demo1')
bind :p1 <== 'test.com' (type 0)
bind :p1 <== 'test.com' (size 8/9/0, ptype 4, otype 1)
bind :p2 <== 'Demo Company' (type 0)
bind :p2 <== 'Demo Company' (size 12/13/0, ptype 4, otype 1)
bind :p3 <== '16/Aug/2004:15:06:15' (type 0)
bind :p3 <== '16/Aug/2004:15:06:15' (size 20/21/0, ptype 4, otype 1)
bind :p4 <== '/index.jhtml' (type 0)
bind :p4 <== '/index.jhtml' (size 12/13/0, ptype 4, otype 1)
bind :p5 <== 'demo1' (t! ype 0)
bind :p5 <== 'demo1' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- execute=3D undef at DBI.pm line 1428
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- do=3D undef at test4.pl line 34
1 -> FETCH for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER =
'ParamValues')
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
1 <- FETCH=3D undef at test4.pl line 34
-> DESTROY for DBD::Oracle::st (DBI::st=3DHASH(0x5f43f4)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY=3D undef at test4.pl line 34
!=20
-> do for DBD::Oracle::db (DBI::db=3DHASH(0x38ec74)~0x3c7e78 'INSERT =
INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, =
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef 'test.com' 'Demo =
Company' '16/Aug/2004:15:06:54' '/index.jhtml' 'demo1')
1 -> prepare for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER 'INSERT =
INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, =
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef)
dbd_preparse scanned 5 distinct placeholders
1 <- prepare=3D DBI::st=3DHASH(0x5f5cc8) at DBI.pm line 1427
-> execute for DBD::Oracle::st (DBI::st=3DHASH(0x5f5cc8)~0x5f4358 =
'test.com' 'Demo Company' '16/Aug/2004:15:06:54' '/index.jhtml' 'demo1')
bind :p1 <== 'test.com' (type 0)
bind :p1 <== 'test.com' (size 8/9/0, ptype 4, otype 1)
bind :p2 <== 'Demo Company' (type 0)
bind :p2 <== 'Demo Company' (size 12/13/0, ptype 4, otype 1)
[Ron Reidy] According to your ! input data (and how you are binding this =
data), column #2 should be the date/time data. Because this data is not =
numeric, it is throwing the ORA-01858 error.
bind :p3 <== '16/Aug/2004:15:06:54' (type 0)
bind :p3 <== '16/Aug/2004:15:06:54' (size 20/21/0, ptype 4, otype 1)
bind :p4 <== '/index.jhtml' (type 0)
bind :p4 <== '/index.jhtml' (size 12/13/0, ptype 4, otype 1)
bind :p5 <== 'demo1' (type 0)
bind :p5 <== 'demo1' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- execute=3D undef at DBI.pm line 1428
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- do=3D undef at test4.pl line 34
1 -> FETCH for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER =
'ParamValues')
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
1 <- FETCH=3D undef at test4.pl line 34
-> DESTROY for DBD::Oracle::st (DBI::st=3DHASH(0x5f4358)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY=3D undef at test4.pl line 34
-> disconnect for DBD::CSV::db (DBI::db=3DHASH(0x3c7744)~0x20737c)
1 -> STORE in DBD::File::db for DBD::CSV::db =
(DBI::db=3DHASH(0x20737c)~INNER 'Active' 0)
1 <- STORE=3D 1 at CSV.pm line 106
<- disconnect=3D 1 at test4.pl line 37
-> DESTROY for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY=3D undef
-> DESTROY in DBD::File::st for DBD::CSV! ::st =
(DBI::st=3DHASH(0x3c7e3c)~INNER)
<- DESTROY=3D undef
-> DESTROY for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER)
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'Active' 0)
<- STORE=3D 1 at CSV.pm line 101
<- DESTROY=3D undef
-- DBI::END
-> disconnect_all for DBD::Oracle::dr =
(DBI::dr=3DHASH(0x207480)~0x3f05b8)
<- disconnect_all=3D (not implemented) at DBI.pm line 674
-> disconnect_all in DBD::File::dr for DBD::CSV::dr =
(DBI::dr=3DHASH(0x1b6268)~0x3c7750)
<- disconnect_all=3D undef at DBI.pm line 674
! -> DESTROY for DBD::Oracle::dr (DBI::dr=3DHASH(0x3f05b8)~INNER)
! <- DESTROY=3D (not implemented) during global destruction
! -> DESTROY in DBD::File::dr for DBD::CSV::dr =
(DBI::dr=3DHASH(0x3c7750)~INNER)
! <- DESTROY=3D undef during global destruction
__________________________________________________
Do You Yahoo!?
Tired of spam? Yaho! o! Mail has the best spam protection around=20
http://mail.yahoo.com=20
This electronic message transmission is a PRIVATE communication which =
contains
information which may be confidential or privileged. The information is =
intended=20
to be for the use of the individual or entity named above. If you are =
not the=20
intended recipient, please be aware that any disclosure, copying, =
distribution=20
or use of the contents of this information is prohibited. Please notify =
the
sender of the delivery error by replying to this message, or notify us =
by
telephone (877-633-2436, ext. 0), and then delete it from your system.
_____ =20
Do you Yahoo!?
New =
new_mail/static/efficiency.html> and Improved Yahoo! Mail - Send 10MB =
messages!
This electronic message transmission is a PRIVATE communication which =
contains
information which may be confidential or privileged. The information is =
intended=20
to be for the use of the individual or entity named above. If you are =
not the=20
intended recipient, please be aware that any disclosure, copying, =
distribution=20
or use of the contents of this information is prohibited. Please notify =
the
sender of the delivery error by replying to this message, or notify us =
by
telephone (877-633-2436, ext. 0), and then delete it from your system.
------_=_NextPart_001_01C4A71D.4629C810--
RE: DBD-Oracle
am 30.09.2004 20:50:11 von Ron.Reidy
Robert,
Look ate your INSERT statement and the ordering of your bind variables.
-----------------
Ron Reidy
Lead DBA
Array BioPharma, Inc.
-----Original Message-----
From: Reidy, Ron=20
Sent: Thursday, September 30, 2004 12:43 PM
To: Robert; DBI-Users
Subject: RE: DBD-Oracle
Is the binding happeneing in the same manner?
=20
-----------------=20
Ron Reidy=20
Lead DBA=20
Array BioPharma, Inc.=20
-----Original Message-----
From: Robert [mailto:rgoud@yahoo.com]
Sent: Thursday, September 30, 2004 12:21 PM
To: Reidy, Ron; DBI-Users
Subject: RE: DBD-Oracle
Changing the order did not help, I am still getting same error.
"Reidy, Ron" wrote:=20
I'm no expert on DBD::CSV, but it looks like the ordering of your =
columns in your select list is not mapping correctly to the format of =
your input file. The key to this is located in the DBI trace log. Look =
for "[Ron Reidy]" below:
-----------------
Ron Reidy
Lead DBA
Array BioPharma, Inc.
-----Original Message-----
From: Robert [mailto:rgoud@yahoo.com]
Sent: Thursday, September 30, 2004 11:23 AM
To: DBI-Users
Subject: DBD-Oracle
Hi list, I am trying to load the following data into Oracle table which =
has a date column
bash-2.03$ cat processed.csv
test.com|16/Aug/2004:15:06:14|/index.html|demo1|Demo Company|
test.com|16/Aug/2004:15:06:15|/index.jhtml|demo1|Demo Company|
test.com|16/Aug/2004:15:06:54|/index.jhtml|demo1|Demo Company|
Here is my code ....
#!/usr/bin/perl -w
use DBI;
use strict;
use DBI qw(:sql_types);
DBI->trace( 2, 'dbitrace.log' );
my $dbh1 =3D DBI->connect("DBI:CSV:");
$dbh1->{'csv_tables'}->{'processed'} =3D {
'eol' =3D> "\n",
'sep_char' =3D> "|",
'quote_char' =3D> undef,
'escape_char' =3D> undef,
'file' =3D> '/home/user1/reports/processed.csv',
'col_names' =3D> ["hostname", "datetime", "url","username", "company"]
};
my $dbh2 =3D DBI->connect("dbi:Oracle:db1", "report", "report" ) or die =
"Can't make 2nd database connect: $DBI::errstr\n";
my($hostname, $url, $username, $company, $datetime);
#my($hostname, $url, $username, $company);
#$sel1->bind_columns(undef, \$hostname, \$datetime, \$url, \$username, =
\$company);
my $sel1 =3D $dbh1->prepare("SELECT =
hostname,datetime,url,username,company FROM processed");
$sel1->execute();
my $array_ref =3D $sel1->fetchall_arrayref();
$sel1->bind_columns( undef, \$hostname, \$datetime, \$url, \$username, =
\$company );
foreach my $row (@$array_ref) {
my ($hostname, $url, $username, $company, $datetime) =3D @$row;
$dbh2->do("INSERT INTO webtest (hostname,datetime,url,username,company) =
VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )", undef, =
$hostname, $datetime
, $url, $username, $company );
}
$dbh1->disconnect();
When I execute the perl code I am getting the following errors
bash-2.03$ perl test4.pl
DBD::Oracle::db do failed: ORA-01858: a non-numeric character was found =
where a numeric was expected (DBD ERROR: OCIStmtExecute) [for Statement =
"INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( =
?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )"] at test4.pl line 34.
DBD::Oracle::db do failed: ORA-01858: a non-numeric character was found =
where a numeric was expected (! DBD ERROR: OCIStmtExecute) [for =
Statement "INSERT INTO webtest (hostname,datetime,url,username,company) =
VALUES ( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )"] at test4.pl =
line 34.
DBD::Oracle::db do failed: ORA-01858: a non-numeric character was found =
where a numeric was expected (DBD ERROR: OCIStmtExecute) [for Statement =
"INSERT INTO webtest (hostname,datetime,url,username,company) VALUES ( =
?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )"] at test4.pl line 34.
Here is the table information
SQL> desc webtest
Name Null? Type
----------------------------------------- -------- =
----------------------------
HOSTNAME VARCHAR2(100)
DATETIME DATE
URL VARCHAR2(1000)
USERNAME VARCHAR2(20)
COMPANY VARCHAR2(100)
Here is the dbitrace log, please let me know the problem.
bash-2.03$ cat dbitrace.log
DBI 1.43-nothread default trace level set to 0x0/2 (pid 3648)
-> DBI->connect(DBI:CSV:, , ****)
-> DBI->install_driver(CSV) for solaris perl=3D5.006001 pid=3D3648 =
ruid=3D501 euid=3D501
install_driver: DBD::CSV version 0.21 loaded from =
/usr/local/lib/perl5/site_perl/5.6.1/DBD/CSV.pm
<- install_driver=3D DBI::dr=3DHASH(0x1b6268)
-> default_user in DBD::_::dr for DBD::CSV::dr =
(DBI::dr=3DHASH(0x1b6268)~0x3c7750 undef undef HASH(0x18ded8))
<- default_user=3D ( undef undef ) [2 items] at DBI.pm line 577
-> connect for DBD::CSV::dr (DBI::dr=3DHASH(0x1b6268)~0x3c7750 '' undef =
**** HASH(0x207388))
-> STORE in DBD::File::db for DBD::CSV::db =
(DBI::db=3DHASH(0x20737c)~INNER 'f_dir' '.')
<- STORE=3D 1 at File.pm line 75
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER =
'f_valid_attrs' HASH(0x2073dc))
<- STORE=3D 1 at File.pm line 89
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER =
'sql_valid_attrs' HASH(0x20751c))
<- STORE=3D 1 at File.pm line 94
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x3c7744)~0x20737c 'Active' 1)
<- STORE=3D 1 at File.pm line 100
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'f_version' =
'0.31')
<- STORE=3D 1 at File.pm line 106
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER =
'sql_nano_version' '0.01')
<- STORE=3D 1 at File.pm line 108
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER =
'sql_statement_version' '1.09')
<- STORE=3D 1 at File.pm line 108
<> FETCH=3D '1.09' ('sql_statement_version' from cache) at File.pm line =
110
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'sql_handler' =
'SQL::Statement')
<- STORE=3D 1 at File.pm line 110
-> FETCH in DBD::File::db for DBD::CSV::db =
(DBI::db=3DHASH(0x20737c)~INNER 'csv_tables')
<- FETCH=3D undef at CSV.pm line 74
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'csv_tables' =
HASH(0x207570))
<- STORE=3D 1 at CSV.pm line 74
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'Active' 1)
<- STORE=3D 1 at CSV.pm line 75
<- connect=3D DBI::db=3DHASH(0x3c7744) at DBI.pm line 595
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'PrintError' =
1)
<- STORE=3D 1 at DBI.pm line 642
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'AutoCommit' =
1)
<- STORE=3D 1 at DBI.pm line 642
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'Username' =
undef)
<- STORE=3D 1 at DBI.pm line 645
<> FETCH=3D undef ('Username' from cache) at DBI.pm line 645
<- connect=3D DBI::db=3DHASH(0x3c7744)
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER =
'dbi_connect_closure' CODE(0x3c77d4))
<- STORE=3D 1 at DBI.pm line 665
<> FETCH=3D HASH(0x207570)0keys ('csv_tables' from cache) at test4.pl =
line 9
-> DBI->connect(dbi:Oracle:db1, report, ****)
-> DBI->install_driver(Oracle) for solaris perl=3D5.006001 pid=3D3648 =
ruid=3D501 euid=3D501
install_driver: DBD::Oracle version 1.14 loaded from =
/usr/local/lib/perl5/site_perl/5.6.1/sun4-solaris/DBD/Oracle .pm
-> STORE in DBD::_::common for DBD::Oracle::dr =
(DBI::dr=3DHASH(0x207480)~0x3f05b8 'ShowErrorStatement' 1)
<- STORE=3D 1 at Oracle.pm line 64
<- install_driver=3D DBI::dr=3DHASH(0x207480)
-> connect for DBD::Oracle::dr (DBI::dr=3DHASH(0x207480)~0x3f05b8 'db1' =
'report' **** HASH(0x3c7e48))
<- connect=3D DBI::db=3DHASH(0x38ec74) at DBI.pm line 595
-> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER =
'PrintError' 1)
<- STORE=3D 1 at DBI.pm line 642
-> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER =
'AutoCommit' 1)
<- STORE=3D 1 at DBI.pm line 642
-> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER 'Username' =
'report')
<- STORE=3D 1 at DBI.pm line 645
<> FETCH=3D 'report' ('Username' from cache) at DBI.pm line 645
<- connect=3D DBI::db=3DHASH(0x38ec74)
-> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER =
'dbi_connect_closure' CODE(0x3cea8c))
<- STORE=3D 1 at DBI.pm line 665
-> prepare in DBD::File::db for DBD::CSV::db =
(DBI::db=3DHASH(0x3c7744)~0x20737c 'SELECT =
hostname,datetime,url,username,company FROM processed')
<> FETCH=3D 'DBD::CSV::st' ('ImplementorClass' from cache) at File.pm =
line 162
1 -> csv_cache_sql_parser_object for DBD::CSV::db =
(DBI::db=3DHASH(0x20737c)~INNER)
2 -> FETCH in DBD::File::db for DBD::CSV::db =
(DBI::db=3DHASH(0x20737c)~INNER 'RaiseError')
2 <- FETCH=3D ( '' ) [1 items] at CSV.pm line 87
2 -> FETCH for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER =
'PrintError')
2 <- FETCH=3D ( 1 ) [1 items] at CSV.pm line 87
2 -> FETCH for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'csv_sql')
2 <- FETCH=3D undef at CSV.pm line 92
1 <- csv_cache_sql_parser_object=3D SQL::Parser=3DHASH(0x5fc118) at =
File.pm line 174
-> STORE in DBD::File::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7f20)~0x3c7e3c 'f_stmt' =
DBD::CSV::Statement=3DHASH(0x5fbddc))
<- STORE=3D 1 at File.pm line 189
-> STORE for DBD::CSV::st (DBI::st=3DHASH(0x3c7f20)~0x3c7e3c 'f_params' =
ARRAY(0x5f22d4))
<- STORE=3D 1 at File.pm line 190
-> STORE for DBD::CSV::st (DBI::st=3DHASH(0x3c7f20)~0x3c7e3c =
'NUM_OF_PARAMS' 0)
<- STORE=3D 1 at File.pm line 191
<- prepare=3D DBI::st=3DHASH(0x3c7f20) at test4.pl line 25
-> execute in DBD::File::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7f20)~0x3c7e3c)
1 -> FETCH in DBD::File::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7e3c)~INNER 'NUM_OF_FIELDS')
1 <- FETCH=3D undef at File.pm line 435
1 -> STORE for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~IN! NER =
'NUM_OF_FIELDS' 5)
1 <- STORE=3D 1 at File.pm line 435
<- execute=3D 3 at test4.pl line 26
-> fetchall_arrayref in DBD::_::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7f20)~0x3c7e3c)
1 -> fetch in DBD::File::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7e3c)~INNER)
2 -> FETCH for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER =
'ChopBlanks')
2 <- FETCH=3D '' at File.pm line 457
1 <- fetch=3D [ 'test.com' '16/Aug/2004:15:06:14' '/index.html' 'demo1' =
'Demo Company' ] row1 at DBI.pm line 1825
1 -> fetch for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER)
2 -> FETCH for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER =
'ChopBlanks')
2 <- FETCH=3D '' at File.pm line 457
1 <- fetch=3D [ 'test.com' '16/Aug/2004:15:06:15' '/index.jhtml' 'demo1' =
'Demo Company' ] row2 at DBI.pm line 1825
1 -> fetch for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER)
2 -> FETCH for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~! INNER =
'ChopBlanks')
2 <- FETCH=3D '' at File.pm line 457
1 <- fetch=3D [ 'test.com' '16/Aug/2004:15:06:54' '/index.jhtml' 'demo1' =
'Demo Company' ] row3 at DBI.pm line 1825
1 -> fetch for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER)
1 <- fetch=3D undef row3 at DBI.pm line 1825
<- fetchall_arrayref=3D [ ARRAY(0x5f28d0) ARRAY(0x5f4208) =
ARRAY(0x5f425c) ] row3 at test4.pl line 28
-> bind_columns in DBD::_::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7f20)~0x3c7e3c undef SCALAR(0x16eab0) =
SCALAR(0x16ea50) SCALAR(0x16eaa4) SCALAR(0x16ea80) SCALAR(0x16ea68))
1 <> FETCH=3D 5 ('NUM_OF_FIELDS' from cache) at DBI.pm line 1695
1 -> bind_col in DBD::_::st for DBD::CSV::st =
(DBI::st=3DHASH(0x3c7e3c)~INNER 1 SCALAR(0x16eab0) undef)
1 <- bind_col=3D 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER 2 =
SCALAR(0x16ea50) undef)
1 <- bind_col=3D 1 at DBI.pm line 1708
1 -> ! bind_col for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER 3 =
SCALAR(0x16eaa4) undef)
1 <- bind_col=3D 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER 4 =
SCALAR(0x16ea80) undef)
1 <- bind_col=3D 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=3DHASH(0x3c7e3c)~INNER 5 =
SCALAR(0x16ea68) undef)
1 <- bind_col=3D 1 at DBI.pm line 1708
<- bind_columns=3D 1 at test4.pl line 30
-> do in DBD::_::db for DBD::Oracle::db =
(DBI::db=3DHASH(0x38ec74)~0x3c7e78 'INSERT INTO webtest =
(hostname,datetime,url,username,company) VALUES ( ?, =
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef 'test.com' 'Demo =
Company' '16/Aug/2004:15:06:14' '/index.html' 'demo1')
1 -> prepare for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER 'INSERT =
INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, =
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef)
dbd_preparse scanned 5 distinct placeholders
1 <- prepare=3D DBI::st=3DHASH(0x5fc01c) at DBI.pm line 1427
-> execute for DBD::Oracle::st (DBI::st=3DHASH(0x5fc01c)~0x5f431c =
'test.com' 'Demo Company' '16/Aug/2004:15:06:14' '/index.html' 'demo1')
bind :p1 <== 'test.com' (type 0)
bind :p1 <== 'test.com' (size 8/9/0, ptype 4, otype 1)
bind :p2 <== 'Demo Company' (type 0)
bind :p2 <== 'Demo Company' (size 12/13/0, ptype 4, otype 1)
bind :p3 <== '16/Aug/2004:15:06:14' (type 0)
bind :p3 <== '16/Aug/2004:15:06:14' (size 20/21/0, ptype 4, otype 1)
bind :p4 <== '/index.html' (type 0)
bind :p4 <== '/index.html' (size 11/12/0, ptype 4, otype 1)
bind :p5 <== 'demo1' (type 0)
bind :p5 <== 'demo1' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- execute=3D undef at DBI.pm line 1428
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- do=3D undef at test4.pl line 34
1 -> FETCH for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER =
'ParamValues')
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
1 <- FETCH=3D undef at test4.pl line 34
-> DESTROY for DBD::Oracle::st (DBI::st=3DHASH(0x5f431c)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY=3D undef at test4.pl line 34
-> do for DBD::Oracle::db (DBI::db=3DHASH(0x38ec74)~0x3c7e78 'INSERT =
INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, =
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef 'test.com' 'Demo =
Company' '16/Aug/2004:15:06:15' '/index.jhtml' 'demo1')
1 -> prepare for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER 'INSERT =
INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, =
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef)
dbd_preparse scanned 5 distinct placeholders
1 <- prepare=3D DBI::st=3DHASH(0x5f4364) at DBI.pm line 1427
-> execute for DBD::Oracle::st (DBI::st=3DHASH(0x5f4364)~0x5f43f4 =
'test.com' 'Demo Company' '16/Aug/2004:15:06:15' '/index.jhtml' 'demo1')
bind :p1 <== 'test.com' (type 0)
bind :p1 <== 'test.com' (size 8/9/0, ptype 4, otype 1)
bind :p2 <== 'Demo Company' (type 0)
bind :p2 <== 'Demo Company' (size 12/13/0, ptype 4, otype 1)
bind :p3 <== '16/Aug/2004:15:06:15' (type 0)
bind :p3 <== '16/Aug/2004:15:06:15' (size 20/21/0, ptype 4, otype 1)
bind :p4 <== '/index.jhtml' (type 0)
bind :p4 <== '/index.jhtml' (size 12/13/0, ptype 4, otype 1)
bind :p5 <== 'demo1' (t! ype 0)
bind :p5 <== 'demo1' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- execute=3D undef at DBI.pm line 1428
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- do=3D undef at test4.pl line 34
1 -> FETCH for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER =
'ParamValues')
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
1 <- FETCH=3D undef at test4.pl line 34
-> DESTROY for DBD::Oracle::st (DBI::st=3DHASH(0x5f43f4)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY=3D undef at test4.pl line 34
!=20
-> do for DBD::Oracle::db (DBI::db=3DHASH(0x38ec74)~0x3c7e78 'INSERT =
INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, =
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef 'test.com' 'Demo =
Company' '16/Aug/2004:15:06:54' '/index.jhtml' 'demo1')
1 -> prepare for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER 'INSERT =
INTO webtest (hostname,datetime,url,username,company) VALUES ( ?, =
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef)
dbd_preparse scanned 5 distinct placeholders
1 <- prepare=3D DBI::st=3DHASH(0x5f5cc8) at DBI.pm line 1427
-> execute for DBD::Oracle::st (DBI::st=3DHASH(0x5f5cc8)~0x5f4358 =
'test.com' 'Demo Company' '16/Aug/2004:15:06:54' '/index.jhtml' 'demo1')
bind :p1 <== 'test.com' (type 0)
bind :p1 <== 'test.com' (size 8/9/0, ptype 4, otype 1)
bind :p2 <== 'Demo Company' (type 0)
bind :p2 <== 'Demo Company' (size 12/13/0, ptype 4, otype 1)
[Ron Reidy] According to your ! input data (and how you are binding this =
data), column #2 should be the date/time data. Because this data is not =
numeric, it is throwing the ORA-01858 error.
bind :p3 <== '16/Aug/2004:15:06:54' (type 0)
bind :p3 <== '16/Aug/2004:15:06:54' (size 20/21/0, ptype 4, otype 1)
bind :p4 <== '/index.jhtml' (type 0)
bind :p4 <== '/index.jhtml' (size 12/13/0, ptype 4, otype 1)
bind :p5 <== 'demo1' (type 0)
bind :p5 <== 'demo1' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- execute=3D undef at DBI.pm line 1428
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- do=3D undef at test4.pl line 34
1 -> FETCH for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER =
'ParamValues')
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
1 <- FETCH=3D undef at test4.pl line 34
-> DESTROY for DBD::Oracle::st (DBI::st=3DHASH(0x5f4358)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY=3D undef at test4.pl line 34
-> disconnect for DBD::CSV::db (DBI::db=3DHASH(0x3c7744)~0x20737c)
1 -> STORE in DBD::File::db for DBD::CSV::db =
(DBI::db=3DHASH(0x20737c)~INNER 'Active' 0)
1 <- STORE=3D 1 at CSV.pm line 106
<- disconnect=3D 1 at test4.pl line 37
-> DESTROY for DBD::Oracle::db (DBI::db=3DHASH(0x3c7e78)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a =
numeric was expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY=3D undef
-> DESTROY in DBD::File::st for DBD::CSV! ::st =
(DBI::st=3DHASH(0x3c7e3c)~INNER)
<- DESTROY=3D undef
-> DESTROY for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER)
-> STORE for DBD::CSV::db (DBI::db=3DHASH(0x20737c)~INNER 'Active' 0)
<- STORE=3D 1 at CSV.pm line 101
<- DESTROY=3D undef
-- DBI::END
-> disconnect_all for DBD::Oracle::dr =
(DBI::dr=3DHASH(0x207480)~0x3f05b8)
<- disconnect_all=3D (not implemented) at DBI.pm line 674
-> disconnect_all in DBD::File::dr for DBD::CSV::dr =
(DBI::dr=3DHASH(0x1b6268)~0x3c7750)
<- disconnect_all=3D undef at DBI.pm line 674
! -> DESTROY for DBD::Oracle::dr (DBI::dr=3DHASH(0x3f05b8)~INNER)
! <- DESTROY=3D (not implemented) during global destruction
! -> DESTROY in DBD::File::dr for DBD::CSV::dr =
(DBI::dr=3DHASH(0x3c7750)~INNER)
! <- DESTROY=3D undef during global destruction
__________________________________________________
Do You Yahoo!?
Tired of spam? Yaho! o! Mail has the best spam protection around=20
http://mail.yahoo.com=20
This electronic message transmission is a PRIVATE communication which =
contains
information which may be confidential or privileged. The information is =
intended=20
to be for the use of the individual or entity named above. If you are =
not the=20
intended recipient, please be aware that any disclosure, copying, =
distribution=20
or use of the contents of this information is prohibited. Please notify =
the
sender of the delivery error by replying to this message, or notify us =
by
telephone (877-633-2436, ext. 0), and then delete it from your system.
_____ =20
Do you Yahoo!?
New =
new_mail/static/efficiency.html> and Improved Yahoo! Mail - Send 10MB =
messages!
This electronic message transmission is a PRIVATE communication which =
contains
information which may be confidential or privileged. The information is =
intended=20
to be for the use of the individual or entity named above. If you are =
not the=20
intended recipient, please be aware that any disclosure, copying, =
distribution=20
or use of the contents of this information is prohibited. Please notify =
the
sender of the delivery error by replying to this message, or notify us =
by
telephone (877-633-2436, ext. 0), and then delete it from your system.
This electronic message transmission is a PRIVATE communication which =
contains
information which may be confidential or privileged. The information is =
intended=20
to be for the use of the individual or entity named above. If you are =
not the=20
intended recipient, please be aware that any disclosure, copying, =
distribution=20
or use of the contents of this information is prohibited. Please notify =
the
sender of the delivery error by replying to this message, or notify us =
by
telephone (877-633-2436, ext. 0), and then delete it from your system.
Re: DBD-Oracle
am 01.10.2004 07:50:47 von christian.merz
Hi Robert,
try this one:
> my $sel1 = $dbh1->prepare("SELECT hostname,datetime,url,username,company FROM
processed");
> $sel1->execute();
> my $array_ref = $sel1->fetchall_arrayref();
> $sel1->bind_columns( undef, \$hostname, \$datetime, \$url, \$username,
\$company );
> foreach my $row (@$array_ref) {
> my ($hostname, $url, $username, $company, $datetime) = @$row;
better> my ($hostname, $datetime, $url, $username, $company) = @$row;
cu, Christian
----- Original Message -----
From: "Reidy, Ron"
To: "Robert" ; "DBI-Users"
Sent: Thursday, September 30, 2004 8:50 PM
Subject: RE: DBD-Oracle
Robert,
Look ate your INSERT statement and the ordering of your bind variables.
-----------------
Ron Reidy
Lead DBA
Array BioPharma, Inc.
-----Original Message-----
From: Reidy, Ron
Sent: Thursday, September 30, 2004 12:43 PM
To: Robert; DBI-Users
Subject: RE: DBD-Oracle
Is the binding happeneing in the same manner?
-----------------
Ron Reidy
Lead DBA
Array BioPharma, Inc.
-----Original Message-----
From: Robert [mailto:rgoud@yahoo.com]
Sent: Thursday, September 30, 2004 12:21 PM
To: Reidy, Ron; DBI-Users
Subject: RE: DBD-Oracle
Changing the order did not help, I am still getting same error.
"Reidy, Ron" wrote:
I'm no expert on DBD::CSV, but it looks like the ordering of your columns in
your select list is not mapping correctly to the format of your input file. The
key to this is located in the DBI trace log. Look for "[Ron Reidy]" below:
-----------------
Ron Reidy
Lead DBA
Array BioPharma, Inc.
-----Original Message-----
From: Robert [mailto:rgoud@yahoo.com]
Sent: Thursday, September 30, 2004 11:23 AM
To: DBI-Users
Subject: DBD-Oracle
Hi list, I am trying to load the following data into Oracle table which has a
date column
bash-2.03$ cat processed.csv
test.com|16/Aug/2004:15:06:14|/index.html|demo1|Demo Company|
test.com|16/Aug/2004:15:06:15|/index.jhtml|demo1|Demo Company|
test.com|16/Aug/2004:15:06:54|/index.jhtml|demo1|Demo Company|
Here is my code ....
#!/usr/bin/perl -w
use DBI;
use strict;
use DBI qw(:sql_types);
DBI->trace( 2, 'dbitrace.log' );
my $dbh1 = DBI->connect("DBI:CSV:");
$dbh1->{'csv_tables'}->{'processed'} = {
'eol' => "\n",
'sep_char' => "|",
'quote_char' => undef,
'escape_char' => undef,
'file' => '/home/user1/reports/processed.csv',
'col_names' => ["hostname", "datetime", "url","username", "company"]
};
my $dbh2 = DBI->connect("dbi:Oracle:db1", "report", "report" ) or die "Can't
make 2nd database connect: $DBI::errstr\n";
my($hostname, $url, $username, $company, $datetime);
#my($hostname, $url, $username, $company);
#$sel1->bind_columns(undef, \$hostname, \$datetime, \$url, \$username,
\$company);
my $sel1 = $dbh1->prepare("SELECT hostname,datetime,url,username,company FROM
processed");
$sel1->execute();
my $array_ref = $sel1->fetchall_arrayref();
$sel1->bind_columns( undef, \$hostname, \$datetime, \$url, \$username,
\$company );
foreach my $row (@$array_ref) {
my ($hostname, $url, $username, $company, $datetime) = @$row;
$dbh2->do("INSERT INTO webtest (hostname,datetime,url,username,company) VALUES
( ?, TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )", undef, $hostname,
$datetime
, $url, $username, $company );
}
$dbh1->disconnect();
When I execute the perl code I am getting the following errors
bash-2.03$ perl test4.pl
DBD::Oracle::db do failed: ORA-01858: a non-numeric character was found where a
numeric was expected (DBD ERROR: OCIStmtExecute) [for Statement "INSERT INTO
webtest (hostname,datetime,url,username,company) VALUES ( ?,
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )"] at test4.pl line 34.
DBD::Oracle::db do failed: ORA-01858: a non-numeric character was found where a
numeric was expected (! DBD ERROR: OCIStmtExecute) [for Statement "INSERT INTO
webtest (hostname,datetime,url,username,company) VALUES ( ?,
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )"] at test4.pl line 34.
DBD::Oracle::db do failed: ORA-01858: a non-numeric character was found where a
numeric was expected (DBD ERROR: OCIStmtExecute) [for Statement "INSERT INTO
webtest (hostname,datetime,url,username,company) VALUES ( ?,
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )"] at test4.pl line 34.
Here is the table information
SQL> desc webtest
Name Null? Type
----------------------------------------- -------- ----------------------------
HOSTNAME VARCHAR2(100)
DATETIME DATE
URL VARCHAR2(1000)
USERNAME VARCHAR2(20)
COMPANY VARCHAR2(100)
Here is the dbitrace log, please let me know the problem.
bash-2.03$ cat dbitrace.log
DBI 1.43-nothread default trace level set to 0x0/2 (pid 3648)
-> DBI->connect(DBI:CSV:, , ****)
-> DBI->install_driver(CSV) for solaris perl=5.006001 pid=3648 ruid=501 euid=501
install_driver: DBD::CSV version 0.21 loaded from
/usr/local/lib/perl5/site_perl/5.6.1/DBD/CSV.pm
<- install_driver= DBI::dr=HASH(0x1b6268)
-> default_user in DBD::_::dr for DBD::CSV::dr (DBI::dr=HASH(0x1b6268)~0x3c7750
undef undef HASH(0x18ded8))
<- default_user= ( undef undef ) [2 items] at DBI.pm line 577
-> connect for DBD::CSV::dr (DBI::dr=HASH(0x1b6268)~0x3c7750 '' undef ****
HASH(0x207388))
-> STORE in DBD::File::db for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'f_dir'
'.')
<- STORE= 1 at File.pm line 75
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'f_valid_attrs'
HASH(0x2073dc))
<- STORE= 1 at File.pm line 89
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'sql_valid_attrs'
HASH(0x20751c))
<- STORE= 1 at File.pm line 94
-> STORE for DBD::CSV::db (DBI::db=HASH(0x3c7744)~0x20737c 'Active' 1)
<- STORE= 1 at File.pm line 100
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'f_version' '0.31')
<- STORE= 1 at File.pm line 106
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'sql_nano_version'
'0.01')
<- STORE= 1 at File.pm line 108
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'sql_statement_version'
'1.09')
<- STORE= 1 at File.pm line 108
<> FETCH= '1.09' ('sql_statement_version' from cache) at File.pm line 110
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'sql_handler'
'SQL::Statement')
<- STORE= 1 at File.pm line 110
-> FETCH in DBD::File::db for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER
'csv_tables')
<- FETCH= undef at CSV.pm line 74
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'csv_tables'
HASH(0x207570))
<- STORE= 1 at CSV.pm line 74
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'Active' 1)
<- STORE= 1 at CSV.pm line 75
<- connect= DBI::db=HASH(0x3c7744) at DBI.pm line 595
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'PrintError' 1)
<- STORE= 1 at DBI.pm line 642
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'AutoCommit' 1)
<- STORE= 1 at DBI.pm line 642
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'Username' undef)
<- STORE= 1 at DBI.pm line 645
<> FETCH= undef ('Username' from cache) at DBI.pm line 645
<- connect= DBI::db=HASH(0x3c7744)
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'dbi_connect_closure'
CODE(0x3c77d4))
<- STORE= 1 at DBI.pm line 665
<> FETCH= HASH(0x207570)0keys ('csv_tables' from cache) at test4.pl line 9
-> DBI->connect(dbi:Oracle:db1, report, ****)
-> DBI->install_driver(Oracle) for solaris perl=5.006001 pid=3648 ruid=501
euid=501
install_driver: DBD::Oracle version 1.14 loaded from
/usr/local/lib/perl5/site_perl/5.6.1/sun4-solaris/DBD/Oracle .pm
-> STORE in DBD::_::common for DBD::Oracle::dr (DBI::dr=HASH(0x207480)~0x3f05b8
'ShowErrorStatement' 1)
<- STORE= 1 at Oracle.pm line 64
<- install_driver= DBI::dr=HASH(0x207480)
-> connect for DBD::Oracle::dr (DBI::dr=HASH(0x207480)~0x3f05b8 'db1' 'report'
**** HASH(0x3c7e48))
<- connect= DBI::db=HASH(0x38ec74) at DBI.pm line 595
-> STORE for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'PrintError' 1)
<- STORE= 1 at DBI.pm line 642
-> STORE for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'AutoCommit' 1)
<- STORE= 1 at DBI.pm line 642
-> STORE for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'Username' 'report')
<- STORE= 1 at DBI.pm line 645
<> FETCH= 'report' ('Username' from cache) at DBI.pm line 645
<- connect= DBI::db=HASH(0x38ec74)
-> STORE for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'dbi_connect_closure'
CODE(0x3cea8c))
<- STORE= 1 at DBI.pm line 665
-> prepare in DBD::File::db for DBD::CSV::db (DBI::db=HASH(0x3c7744)~0x20737c
'SELECT hostname,datetime,url,username,company FROM processed')
<> FETCH= 'DBD::CSV::st' ('ImplementorClass' from cache) at File.pm line 162
1 -> csv_cache_sql_parser_object for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER)
2 -> FETCH in DBD::File::db for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER
'RaiseError')
2 <- FETCH= ( '' ) [1 items] at CSV.pm line 87
2 -> FETCH for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'PrintError')
2 <- FETCH= ( 1 ) [1 items] at CSV.pm line 87
2 -> FETCH for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'csv_sql')
2 <- FETCH= undef at CSV.pm line 92
1 <- csv_cache_sql_parser_object= SQL::Parser=HASH(0x5fc118) at File.pm line 174
-> STORE in DBD::File::st for DBD::CSV::st (DBI::st=HASH(0x3c7f20)~0x3c7e3c
'f_stmt' DBD::CSV::Statement=HASH(0x5fbddc))
<- STORE= 1 at File.pm line 189
-> STORE for DBD::CSV::st (DBI::st=HASH(0x3c7f20)~0x3c7e3c 'f_params'
ARRAY(0x5f22d4))
<- STORE= 1 at File.pm line 190
-> STORE for DBD::CSV::st (DBI::st=HASH(0x3c7f20)~0x3c7e3c 'NUM_OF_PARAMS' 0)
<- STORE= 1 at File.pm line 191
<- prepare= DBI::st=HASH(0x3c7f20) at test4.pl line 25
-> execute in DBD::File::st for DBD::CSV::st (DBI::st=HASH(0x3c7f20)~0x3c7e3c)
1 -> FETCH in DBD::File::st for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER
'NUM_OF_FIELDS')
1 <- FETCH= undef at File.pm line 435
1 -> STORE for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~IN! NER 'NUM_OF_FIELDS' 5)
1 <- STORE= 1 at File.pm line 435
<- execute= 3 at test4.pl line 26
-> fetchall_arrayref in DBD::_::st for DBD::CSV::st
(DBI::st=HASH(0x3c7f20)~0x3c7e3c)
1 -> fetch in DBD::File::st for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER)
2 -> FETCH for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 'ChopBlanks')
2 <- FETCH= '' at File.pm line 457
1 <- fetch= [ 'test.com' '16/Aug/2004:15:06:14' '/index.html' 'demo1' 'Demo
Company' ] row1 at DBI.pm line 1825
1 -> fetch for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER)
2 -> FETCH for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 'ChopBlanks')
2 <- FETCH= '' at File.pm line 457
1 <- fetch= [ 'test.com' '16/Aug/2004:15:06:15' '/index.jhtml' 'demo1' 'Demo
Company' ] row2 at DBI.pm line 1825
1 -> fetch for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER)
2 -> FETCH for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~! INNER 'ChopBlanks')
2 <- FETCH= '' at File.pm line 457
1 <- fetch= [ 'test.com' '16/Aug/2004:15:06:54' '/index.jhtml' 'demo1' 'Demo
Company' ] row3 at DBI.pm line 1825
1 -> fetch for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER)
1 <- fetch= undef row3 at DBI.pm line 1825
<- fetchall_arrayref= [ ARRAY(0x5f28d0) ARRAY(0x5f4208) ARRAY(0x5f425c) ] row3
at test4.pl line 28
-> bind_columns in DBD::_::st for DBD::CSV::st (DBI::st=HASH(0x3c7f20)~0x3c7e3c
undef SCALAR(0x16eab0) SCALAR(0x16ea50) SCALAR(0x16eaa4) SCALAR(0x16ea80)
SCALAR(0x16ea68))
1 <> FETCH= 5 ('NUM_OF_FIELDS' from cache) at DBI.pm line 1695
1 -> bind_col in DBD::_::st for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 1
SCALAR(0x16eab0) undef)
1 <- bind_col= 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 2 SCALAR(0x16ea50)
undef)
1 <- bind_col= 1 at DBI.pm line 1708
1 -> ! bind_col for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 3
SCALAR(0x16eaa4) undef)
1 <- bind_col= 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 4 SCALAR(0x16ea80)
undef)
1 <- bind_col= 1 at DBI.pm line 1708
1 -> bind_col for DBD::CSV::st (DBI::st=HASH(0x3c7e3c)~INNER 5 SCALAR(0x16ea68)
undef)
1 <- bind_col= 1 at DBI.pm line 1708
<- bind_columns= 1 at test4.pl line 30
-> do in DBD::_::db for DBD::Oracle::db (DBI::db=HASH(0x38ec74)~0x3c7e78 'INSERT
INTO webtest (hostname,datetime,url,username,company) VALUES ( ?,
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef 'test.com' 'Demo Company'
'16/Aug/2004:15:06:14' '/index.html' 'demo1')
1 -> prepare for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'INSERT INTO
webtest (hostname,datetime,url,username,company) VALUES ( ?,
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef)
dbd_preparse scanned 5 distinct placeholders
1 <- prepare= DBI::st=HASH(0x5fc01c) at DBI.pm line 1427
-> execute for DBD::Oracle::st (DBI::st=HASH(0x5fc01c)~0x5f431c 'test.com' 'Demo
Company' '16/Aug/2004:15:06:14' '/index.html' 'demo1')
bind :p1 <== 'test.com' (type 0)
bind :p1 <== 'test.com' (size 8/9/0, ptype 4, otype 1)
bind :p2 <== 'Demo Company' (type 0)
bind :p2 <== 'Demo Company' (size 12/13/0, ptype 4, otype 1)
bind :p3 <== '16/Aug/2004:15:06:14' (type 0)
bind :p3 <== '16/Aug/2004:15:06:14' (size 20/21/0, ptype 4, otype 1)
bind :p4 <== '/index.html' (type 0)
bind :p4 <== '/index.html' (size 11/12/0, ptype 4, otype 1)
bind :p5 <== 'demo1' (type 0)
bind :p5 <== 'demo1' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was
expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- execute= undef at DBI.pm line 1428
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was
expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- do= undef at test4.pl line 34
1 -> FETCH for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'ParamValues')
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was
expected (DBD ERROR: OCIStmtExecute)' (err#0)
1 <- FETCH= undef at test4.pl line 34
-> DESTROY for DBD::Oracle::st (DBI::st=HASH(0x5f431c)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was
expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY= undef at test4.pl line 34
-> do for DBD::Oracle::db (DBI::db=HASH(0x38ec74)~0x3c7e78 'INSERT INTO webtest
(hostname,datetime,url,username,company) VALUES ( ?,
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef 'test.com' 'Demo Company'
'16/Aug/2004:15:06:15' '/index.jhtml' 'demo1')
1 -> prepare for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'INSERT INTO
webtest (hostname,datetime,url,username,company) VALUES ( ?,
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef)
dbd_preparse scanned 5 distinct placeholders
1 <- prepare= DBI::st=HASH(0x5f4364) at DBI.pm line 1427
-> execute for DBD::Oracle::st (DBI::st=HASH(0x5f4364)~0x5f43f4 'test.com' 'Demo
Company' '16/Aug/2004:15:06:15' '/index.jhtml' 'demo1')
bind :p1 <== 'test.com' (type 0)
bind :p1 <== 'test.com' (size 8/9/0, ptype 4, otype 1)
bind :p2 <== 'Demo Company' (type 0)
bind :p2 <== 'Demo Company' (size 12/13/0, ptype 4, otype 1)
bind :p3 <== '16/Aug/2004:15:06:15' (type 0)
bind :p3 <== '16/Aug/2004:15:06:15' (size 20/21/0, ptype 4, otype 1)
bind :p4 <== '/index.jhtml' (type 0)
bind :p4 <== '/index.jhtml' (size 12/13/0, ptype 4, otype 1)
bind :p5 <== 'demo1' (t! ype 0)
bind :p5 <== 'demo1' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was
expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- execute= undef at DBI.pm line 1428
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was
expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- do= undef at test4.pl line 34
1 -> FETCH for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'ParamValues')
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was
expected (DBD ERROR: OCIStmtExecute)' (err#0)
1 <- FETCH= undef at test4.pl line 34
-> DESTROY for DBD::Oracle::st (DBI::st=HASH(0x5f43f4)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was
expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY= undef at test4.pl line 34
!
-> do for DBD::Oracle::db (DBI::db=HASH(0x38ec74)~0x3c7e78 'INSERT INTO webtest
(hostname,datetime,url,username,company) VALUES ( ?,
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef 'test.com' 'Demo Company'
'16/Aug/2004:15:06:54' '/index.jhtml' 'demo1')
1 -> prepare for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'INSERT INTO
webtest (hostname,datetime,url,username,company) VALUES ( ?,
TO_DATE(?,'DD/Mon/YYYY:HH24:MI:SS'), ?, ?, ? )' undef)
dbd_preparse scanned 5 distinct placeholders
1 <- prepare= DBI::st=HASH(0x5f5cc8) at DBI.pm line 1427
-> execute for DBD::Oracle::st (DBI::st=HASH(0x5f5cc8)~0x5f4358 'test.com' 'Demo
Company' '16/Aug/2004:15:06:54' '/index.jhtml' 'demo1')
bind :p1 <== 'test.com' (type 0)
bind :p1 <== 'test.com' (size 8/9/0, ptype 4, otype 1)
bind :p2 <== 'Demo Company' (type 0)
bind :p2 <== 'Demo Company' (size 12/13/0, ptype 4, otype 1)
[Ron Reidy] According to your ! input data (and how you are binding this data),
column #2 should be the date/time data. Because this data is not numeric, it is
throwing the ORA-01858 error.
bind :p3 <== '16/Aug/2004:15:06:54' (type 0)
bind :p3 <== '16/Aug/2004:15:06:54' (size 20/21/0, ptype 4, otype 1)
bind :p4 <== '/index.jhtml' (type 0)
bind :p4 <== '/index.jhtml' (size 12/13/0, ptype 4, otype 1)
bind :p5 <== 'demo1' (type 0)
bind :p5 <== 'demo1' (size 5/6/0, ptype 4, otype 1)
dbd_st_execute INSERT (out0, lob0)...
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was
expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- execute= undef at DBI.pm line 1428
!! ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was
expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- do= undef at test4.pl line 34
1 -> FETCH for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER 'ParamValues')
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was
expected (DBD ERROR: OCIStmtExecute)' (err#0)
1 <- FETCH= undef at test4.pl line 34
-> DESTROY for DBD::Oracle::st (DBI::st=HASH(0x5f4358)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was
expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY= undef at test4.pl line 34
-> disconnect for DBD::CSV::db (DBI::db=HASH(0x3c7744)~0x20737c)
1 -> STORE in DBD::File::db for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER
'Active' 0)
1 <- STORE= 1 at CSV.pm line 106
<- disconnect= 1 at test4.pl line 37
-> DESTROY for DBD::Oracle::db (DBI::db=HASH(0x3c7e78)~INNER)
ERROR: 1858 'ORA-01858: a non-numeric character was found where a numeric was
expected (DBD ERROR: OCIStmtExecute)' (err#0)
<- DESTROY= undef
-> DESTROY in DBD::File::st for DBD::CSV! ::st (DBI::st=HASH(0x3c7e3c)~INNER)
<- DESTROY= undef
-> DESTROY for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER)
-> STORE for DBD::CSV::db (DBI::db=HASH(0x20737c)~INNER 'Active' 0)
<- STORE= 1 at CSV.pm line 101
<- DESTROY= undef
-- DBI::END
-> disconnect_all for DBD::Oracle::dr (DBI::dr=HASH(0x207480)~0x3f05b8)
<- disconnect_all= (not implemented) at DBI.pm line 674
-> disconnect_all in DBD::File::dr for DBD::CSV::dr
(DBI::dr=HASH(0x1b6268)~0x3c7750)
<- disconnect_all= undef at DBI.pm line 674
! -> DESTROY for DBD::Oracle::dr (DBI::dr=HASH(0x3f05b8)~INNER)
! <- DESTROY= (not implemented) during global destruction
! -> DESTROY in DBD::File::dr for DBD::CSV::dr (DBI::dr=HASH(0x3c7750)~INNER)
! <- DESTROY= undef during global destruction
__________________________________________________
Do You Yahoo!?
Tired of spam? Yaho! o! Mail has the best spam protection around
http://mail.yahoo.com
This electronic message transmission is a PRIVATE communication which contains
information which may be confidential or privileged. The information is intended
to be for the use of the individual or entity named above. If you are not the
intended recipient, please be aware that any disclosure, copying, distribution
or use of the contents of this information is prohibited. Please notify the
sender of the delivery error by replying to this message, or notify us by
telephone (877-633-2436, ext. 0), and then delete it from your system.
_____
Do you Yahoo!?
New
l/static/efficiency.html> and Improved Yahoo! Mail - Send 10MB messages!
This electronic message transmission is a PRIVATE communication which contains
information which may be confidential or privileged. The information is intended
to be for the use of the individual or entity named above. If you are not the
intended recipient, please be aware that any disclosure, copying, distribution
or use of the contents of this information is prohibited. Please notify the
sender of the delivery error by replying to this message, or notify us by
telephone (877-633-2436, ext. 0), and then delete it from your system.
This electronic message transmission is a PRIVATE communication which contains
information which may be confidential or privileged. The information is intended
to be for the use of the individual or entity named above. If you are not the
intended recipient, please be aware that any disclosure, copying, distribution
or use of the contents of this information is prohibited. Please notify the
sender of the delivery error by replying to this message, or notify us by
telephone (877-633-2436, ext. 0), and then delete it from your system.
RE: DBD-Oracle
am 22.07.2005 19:22:42 von Ron.Reidy
Why can't you download it? ARe you receiving an error?
-----------------
Ron Reidy
Lead DBA
Array BioPharma, Inc.
-----Original Message-----
From: Mary [mailto:m_w_24@yahoo.com]
Sent: Friday, July 22, 2005 9:48 AM
To: dbi-users@perl.org
Subject: DBD-Oracle=20
hello,
I am trying to download DBD-Oracle.ppd from =
http://ftp.esoftmatic.com/outgoing/DBI/5.8.4/=20
and i am not able to download that.
=20
Is there any way that i could download DBD-Oracle.ppd for perl 5.8.7(or =
5.8.4) version on windows XP.
=20
thanks,
Mary.
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around=20
http://mail.yahoo.com=20
This electronic message transmission is a PRIVATE communication which =
contains
information which may be confidential or privileged. The information is =
intended=20
to be for the use of the individual or entity named above. If you are =
not the=20
intended recipient, please be aware that any disclosure, copying, =
distribution=20
or use of the contents of this information is prohibited. Please notify =
the
sender of the delivery error by replying to this message, or notify us =
by
telephone (877-633-2436, ext. 0), and then delete it from your system.
RE: DBD-Oracle
am 25.07.2005 14:58:13 von m_w_24
--0-1965304967-1122296293=:68781
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
I could able to download it now. Thanks!
when i am trying to run my perl script i am getting this error:
ORA-12560: TNS:protocol adapter error (DBD ERROR: OCIServerAttach)
can anyone please let me know the reason for this error and how should i correct it.
thanks,
Mary.
"Reidy, Ron" wrote:
Why can't you download it? ARe you receiving an error?
-----------------
Ron Reidy
Lead DBA
Array BioPharma, Inc.
-----Original Message-----
From: Mary [mailto:m_w_24@yahoo.com]
Sent: Friday, July 22, 2005 9:48 AM
To: dbi-users@perl.org
Subject: DBD-Oracle
hello,
I am trying to download DBD-Oracle.ppd from http://ftp.esoftmatic.com/outgoing/DBI/5.8.4/
and i am not able to download that.
Is there any way that i could download DBD-Oracle.ppd for perl 5.8.7(or 5.8.4) version on windows XP.
thanks,
Mary.
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
This electronic message transmission is a PRIVATE communication which contains
information which may be confidential or privileged. The information is intended
to be for the use of the individual or entity named above. If you are not the
intended recipient, please be aware that any disclosure, copying, distribution
or use of the contents of this information is prohibited. Please notify the
sender of the delivery error by replying to this message, or notify us by
telephone (877-633-2436, ext. 0), and then delete it from your system.
---------------------------------
Start your day with Yahoo! - make it your home page
--0-1965304967-1122296293=:68781--
RE: DBD-Oracle
am 25.07.2005 17:13:31 von Ron.Reidy
------_=_NextPart_001_01C5912B.6AD1D588
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
This is not a Perl error. From the error docs:
=20
12560, 00000, "TNS:protocol adapter error"
// *Cause: A generic protocol adapter error occurred.
// *Action: Check addresses used for proper protocol specification. =
Before
// reporting this error, look at the error stack and check for lower =
level
// transport errors.For further details, turn on tracing and reexecute =
the
// operation. Turn off tracing when the operation is complete.
=20
Can you tnsping the DB instance you are attempting to connect to in your =
Perl program?
=20
If not, consult with your DBA.
=20
-----------------=20
Ron Reidy=20
Lead DBA=20
Array BioPharma, Inc.=20
-----Original Message-----
From: Mary [mailto:m_w_24@yahoo.com]
Sent: Monday, July 25, 2005 6:58 AM
To: Reidy, Ron; dbi-users@perl.org
Subject: RE: DBD-Oracle=20
I could able to download it now. Thanks!
=20
when i am trying to run my perl script i am getting this error:
=20
ORA-12560: TNS:protocol adapter error (DBD ERROR: OCIServerAttach)
=20
can anyone please let me know the reason for this error and how should i =
correct it.
=20
thanks,
Mary.
"Reidy, Ron" wrote:
Why can't you download it? ARe you receiving an error?
-----------------
Ron Reidy
Lead DBA
Array BioPharma, Inc.
-----Original Message-----
From: Mary [mailto:m_w_24@yahoo.com]
Sent: Friday, July 22, 2005 9:48 AM
To: dbi-users@perl.org
Subject: DBD-Oracle=20
hello,
I am trying to download DBD-Oracle.ppd from =
http://ftp.esoftmatic.com/outgoing/DBI/5.8.4/=20
and i am not able to download that.
Is there any way that i could download DBD-Oracle.ppd for perl 5.8.7(or =
5.8.4) version on windows XP.
thanks,
Mary.
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around=20
http://mail.yahoo.com=20
This electronic message transmission is a PRIVATE communication which =
contains
information which may be confidential or privileg! ed. The information =
is intended=20
to be for the use of the individual or entity named above. If you are =
not the=20
intended recipient, please be aware that any disclosure, copying, =
distribution=20
or use of the contents of this information is prohibited. Please notify =
the
sender of the delivery error by replying to this message, or notify us =
by
telephone (877-633-2436, ext. 0), and then delete it from your system.
_____ =20
Start your =
day with =
Yahoo! - make it your home page=20
This electronic message transmission is a PRIVATE communication which =
contains
information which may be confidential or privileged. The information is =
intended=20
to be for the use of the individual or entity named above. If you are =
not the=20
intended recipient, please be aware that any disclosure, copying, =
distribution=20
or use of the contents of this information is prohibited. Please notify =
the
sender of the delivery error by replying to this message, or notify us =
by
telephone (877-633-2436, ext. 0), and then delete it from your system.
------_=_NextPart_001_01C5912B.6AD1D588--
RE: DBD-Oracle
am 21.10.2005 18:49:54 von Ron.Reidy
So, I just have to ask ...
Is your Perl from AS?
--
Ron Reidy
Lead DBA
Array BioPharma, Inc.
-----Original Message-----
From: David Sawyer [mailto:DSawyer@Ceon.com]=20
Sent: Friday, October 21, 2005 9:01 AM
To: dbi-users@perl.org
Subject: DBD-Oracle
I am desperately trying to install DBD-Oracle on my UNIX system. No
matter what I try I get the error :
=20
ceon3@suomp84b > ppm install
ftp://ftp.esoftmatic.com/outgoing/DBI/5.8.4/DBD-Oracle.ppd
=20
Error: no suitable installation target found for package DBD-Oracle.=20
Can ANYONE offer a suggestion as to the cause of this error?
=20
=20
Regards,
David Sawyer
Senior Customer Support Engineer
Ceon Corporation
650-817-6334 (office)=20
650-238-8078 (Blackberry Wireless)
408-832-4354 (mobile)
www.Ceon.com
-.- .---- -.. .-. ...=20
=20
This electronic message transmission is a PRIVATE communication which =
contains
information which may be confidential or privileged. The information is =
intended=20
to be for the use of the individual or entity named above. If you are =
not the=20
intended recipient, please be aware that any disclosure, copying, =
distribution=20
or use of the contents of this information is prohibited. Please notify =
the
sender of the delivery error by replying to this message, or notify us =
by
telephone (877-633-2436, ext. 0), and then delete it from your system.
RE: DBD-Oracle
am 21.10.2005 18:50:59 von ted.behling
You appear to be using ActiveState's Perl distribution. You might have =
better luck installing from CPAN, as in:
perl -MCPAN -e 'install DBD::Oracle'
Ted Behling, ISP Systems Analyst
Hargray Communications
> -----Original Message-----
> From: David Sawyer [mailto:DSawyer@Ceon.com]
> Sent: Friday, October 21, 2005 11:01 AM
> To: dbi-users@perl.org
> Subject: DBD-Oracle
>=20
>=20
> I am desperately trying to install DBD-Oracle on my UNIX system.
> No matter what I try I get the error :
> =20
> ceon3@suomp84b > ppm install
> ftp://ftp.esoftmatic.com/outgoing/DBI/5.8.4/DBD-Oracle.ppd
> =20
> Error: no suitable installation target found for package DBD-Oracle.=20
>=20
> Can ANYONE offer a suggestion as to the cause of this error?
> =20
> =20
> Regards,
> David Sawyer
> Senior Customer Support Engineer
> Ceon Corporation
> 650-817-6334 (office)=20
> 650-238-8078 (Blackberry Wireless)
> 408-832-4354 (mobile)
> www.Ceon.com
> -.- .---- -.. .-. ...=20
> =20
>=20
RE: DBD-Oracle
am 21.10.2005 19:00:34 von DSawyer
Yes. It's Activate State v5.8.7 for Sun multi-thread
=20
Regards,
David Sawyer
Senior Customer Support Engineer
Ceon Corporation
650-817-6334 (office)=20
650-238-8078 (Blackberry Wireless)
408-832-4354 (mobile)
www.Ceon.com
-.- .---- -.. .-. ...=20
-----Original Message-----
From: Reidy, Ron [mailto:Ron.Reidy@arraybiopharma.com]=20
Sent: Friday, October 21, 2005 9:50 AM
To: David Sawyer; dbi-users@perl.org
Subject: RE: DBD-Oracle
So, I just have to ask ...
Is your Perl from AS?
--
Ron Reidy
Lead DBA
Array BioPharma, Inc.
-----Original Message-----
From: David Sawyer [mailto:DSawyer@Ceon.com]
Sent: Friday, October 21, 2005 9:01 AM
To: dbi-users@perl.org
Subject: DBD-Oracle
I am desperately trying to install DBD-Oracle on my UNIX system. No
matter what I try I get the error :
=20
ceon3@suomp84b > ppm install
ftp://ftp.esoftmatic.com/outgoing/DBI/5.8.4/DBD-Oracle.ppd
=20
Error: no suitable installation target found for package DBD-Oracle.=20
Can ANYONE offer a suggestion as to the cause of this error?
=20
=20
Regards,
David Sawyer
Senior Customer Support Engineer
Ceon Corporation
650-817-6334 (office)=20
650-238-8078 (Blackberry Wireless)
408-832-4354 (mobile)
www.Ceon.com
-.- .---- -.. .-. ...=20
=20
This electronic message transmission is a PRIVATE communication which
contains
information which may be confidential or privileged. The information is
intended=20
to be for the use of the individual or entity named above. If you are
not the=20
intended recipient, please be aware that any disclosure, copying,
distribution=20
or use of the contents of this information is prohibited. Please notify
the
sender of the delivery error by replying to this message, or notify us
by
telephone (877-633-2436, ext. 0), and then delete it from your system.
RE: DBD-Oracle
am 21.10.2005 19:03:14 von Ron.Reidy
OK. I do not believe there exists a PPM for DBD::Oracle after version
5.6.1 from AS. Supposedly, because of licensing issues.
The next step would be to build DBD::Oraacle yourself. You will need
the same C compiler iused to build Perl.
--
Ron Reidy
Lead DBA
Array BioPharma, Inc.
-----Original Message-----
From: David Sawyer [mailto:DSawyer@Ceon.com]=20
Sent: Friday, October 21, 2005 11:01 AM
To: Reidy, Ron; dbi-users@perl.org
Subject: RE: DBD-Oracle
Yes. It's Activate State v5.8.7 for Sun multi-thread
=20
Regards,
David Sawyer
Senior Customer Support Engineer
Ceon Corporation
650-817-6334 (office)=20
650-238-8078 (Blackberry Wireless)
408-832-4354 (mobile)
www.Ceon.com
-.- .---- -.. .-. ...=20
-----Original Message-----
From: Reidy, Ron [mailto:Ron.Reidy@arraybiopharma.com]=20
Sent: Friday, October 21, 2005 9:50 AM
To: David Sawyer; dbi-users@perl.org
Subject: RE: DBD-Oracle
So, I just have to ask ...
Is your Perl from AS?
--
Ron Reidy
Lead DBA
Array BioPharma, Inc.
-----Original Message-----
From: David Sawyer [mailto:DSawyer@Ceon.com]
Sent: Friday, October 21, 2005 9:01 AM
To: dbi-users@perl.org
Subject: DBD-Oracle
I am desperately trying to install DBD-Oracle on my UNIX system. No
matter what I try I get the error :
=20
ceon3@suomp84b > ppm install
ftp://ftp.esoftmatic.com/outgoing/DBI/5.8.4/DBD-Oracle.ppd
=20
Error: no suitable installation target found for package DBD-Oracle.=20
Can ANYONE offer a suggestion as to the cause of this error?
=20
=20
Regards,
David Sawyer
Senior Customer Support Engineer
Ceon Corporation
650-817-6334 (office)=20
650-238-8078 (Blackberry Wireless)
408-832-4354 (mobile)
www.Ceon.com
-.- .---- -.. .-. ...=20
=20
This electronic message transmission is a PRIVATE communication which
contains information which may be confidential or privileged. The
information is intended=20
to be for the use of the individual or entity named above. If you are
not the=20
intended recipient, please be aware that any disclosure, copying,
distribution=20
or use of the contents of this information is prohibited. Please notify
the sender of the delivery error by replying to this message, or notify
us by telephone (877-633-2436, ext. 0), and then delete it from your
system.
This electronic message transmission is a PRIVATE communication which =
contains
information which may be confidential or privileged. The information is =
intended=20
to be for the use of the individual or entity named above. If you are =
not the=20
intended recipient, please be aware that any disclosure, copying, =
distribution=20
or use of the contents of this information is prohibited. Please notify =
the
sender of the delivery error by replying to this message, or notify us =
by
telephone (877-633-2436, ext. 0), and then delete it from your system.
Help: Oracle 10G installtion screwed up my perl
am 21.10.2005 19:23:00 von joebayerii
--0-226755343-1129915380=:13088
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
Hi, group,
I used DBI a lot but not experenced in setting up perl.
On my WinXP sp2, I have perl 5.6.1 installed and a lot of scripts depend on that. Recently I installed Oracle 10g Version 2, it added a new system variable
------------------------------------------------------------ ---------------------------------------
PERL5LIB=d:\oracle\ora102\perl\5.8.3\lib\MSWin32-x86;d:\orac le\ora102\perl\5.8.3\lib;d:\oracle\ora102\perl\5.8.3\lib\MSW in32-x86;d:\oracle\ora102\perl\site\5.8.3;d:\oracle\ora102\p erl\site\5.8.3\lib;d:\oracle\ora102\sysman\admin\scripts;
------------------------------------------------------------ ---------------------------------------
Now my poor DBI perl script stopped working. For example, (this is not a DBI script, but just an example how Oracle 10G screwed things up)
C:>ppm
Perl lib version (v5.8.3) doesn't match executable version (v5.6.1) at d:\oracle
\ora102\perl\5.8.3\lib/MSWin32-x86-multi-thread/Config.pm line 32.
Compilation failed in require at d:\Perl\bin/ppm.bat line 18.
BEGIN failed--compilation aborted at d:\Perl\bin/ppm.bat line 18.
------------------------------------------------------------ ------------------------------------
I tried to add my perl path to PERL5LIB=d:\perl\lib;..............
I got
This application fas failed to start because perl58.dll was not found. Re-installing the application may fix this problem.
Could somebody help me?
Thanks
---------------------------------
Yahoo! FareChase - Search multiple travel sites in one click.
--0-226755343-1129915380=:13088--
Re: Help: Oracle 10G installtion screwed up my perl
am 21.10.2005 21:38:20 von jdg117
In message <20051021172300.15763.qmail@web31309.mail.mud.yahoo.com>, joe bayer
writes:
>On my WinXP sp2, I have perl 5.6.1 installed and a lot of scripts depend on th
>at. Recently I installed Oracle 10g Version 2, it added a new system variable
>
>----------------------------------------------------------- -------------------
>---------------------
>
>PERL5LIB=d:\oracle\ora102\perl\5.8.3\lib\MSWin32-x86;d:\ora cle\ora102\perl\5.8
>.3\lib;d:\oracle\ora102\perl\5.8.3\lib\MSWin32-x86;d:\oracl e\ora102\perl\site\
>5.8.3;d:\oracle\ora102\perl\site\5.8.3\lib;d:\oracle\ora102 \sysman\admin\scrip
>ts;
>
>----------------------------------------------------------- -------------------
>---------------------
>
>Now my poor DBI perl script stopped working. For example, (this is not a DBI
>script, but just an example how Oracle 10G screwed things up)
We encountered this problem with an application we deliver for Windows.
The solution was to unset PERL5LIB in the bat file which invokes our
Perl script.
I'm not a DOS expert, but I think the syntax is
@set PERL5LIB=
Happy hacking,
John
groenveld@acm.org