Help for this page

Select Code to Download


  1. or download this
    use DBI qw(:sql_types);
use DBD::Oracle qw(:ora_types);
my $sql3="insert into BEE_DBO.SQL_EXECUTION_LOG(process_execution_id,"
+. "process_step_seq,file_id,sql_statement)". "values(?,?,?,?)";
...
$sth2->bind_param(3,$file_id);
$sth2->bind_param(4,$select_insert,SQL_LONGVARCHAR);
$sth2->execute;
  2. or download this
    F:\_wo\pl_test>perl -c 667004.pl
667004.pl syntax OK

F:\_wo\pl_test>perl 667004.pl
Can't call method "prepare" on an undefined value at 667004.pl line 4.