Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
use strict;
...
$sth->execute(321) or print "Error [" . $sth->errstr . "]\n";
my $rc = $dbh->disconnect();
print "Disconnected rc = $rc\n";
  2. or download this
    Error [ORA-00900: invalid SQL statement (DBD ERROR: OCIStmtExecute)]
Disconnected rc = 1