I insert a record in Oracle table XXX (This table not exists in my database):

$sql =qq{ INSERT INTO XXX VALUES('BYE', SYSDATE) };
$sth=$dbh->prepare( $sql );
$sth->execute;

During the execute I have this error in display:

DBD::Oracle::st execute failed: ORA-00942: table or view does not exist (DBD ERROR: error
possibly near <*> indicator at char 13 in ' INSERT INTO <*>XXX VALUES('BYE', SYSDATE) ')
[for Statement " INSERT INTO XXX VALUES('BYE', SYSDATE) "] at d:\perl\job\pgm_3.pl line 23.

I don't want to display the error!
How can I do?
In database connection I resolved this with {RaiseError => 1}.

Best Regards

rfarabi

this is my program:

use DBI;
use Error qw(:try);
#-
my $username = "SCOTT";
my $password = "TIGER";
my $hostname = "192.168.0.14";
my $dbh;
my $sth;
my $sql;
#-
try{
    $dbh = DBI->connect('dbi:Oracle:host='.$hostname.';sid=ORCL;port=1521;server=dedicated', $username,$password,{RaiseError => 1,AutoCommit => 0});
    try{
       $sql =qq{ INSERT INTO PROVAXX VALUES('RICCARDO', 1) };
       $sth=$dbh->prepare( $sql );
       $sth->execute;
       print "\n * insert ok \n";
    }otherwise{
       $dbh->rollback();
       print "\n * Error insert \n";
    };
    $dbh->disconnect;
}otherwise{
    print "\n * Error connect \n";
};
--------------------------- Result is:
DBD::Oracle::st execute failed: ORA-00942: table or view does not exist (DBD ERROR: error possibly near <*> indicator at char 13 in ' INSERT INTO <*>PROVAXX VALUES('RICCARDO', 1) ') [for Statement " INSERT INTO PROVAXX VALUES('RICCARDO', 1) "] at d:\perl\job\pgm_3.pl line 17.

* Error insert
--------------------------- I want this result:

* Error insert
---------------------------

in that case try PrintError =>0 which will turn off any printing of the Oracle errors