# pepare and execute 'prepack_candidates.sql' print "Preparing 'prepack_candidates.sql'...\n"; my $sth1 = $dbh->prepare($candidates_sql) or die; $sth1->bind_col(1, undef, ORA_VARCHAR2(50)); $sth1->bind_col(2, undef, ORA_NUMBER(10)); $sth1->bind_col(3, undef, ORA_NUMBER(10)); print "Executing 'prepack_candidates.sql'...\n"; $sth1->execute() or die;