or download this
$dbh = $dbh->prepare("INSERT INTO vindbase_operator.mobily_vb_
+script_worklistv2 (worklistid, emstype, submitserver, submitdate, sub
+mitowner, state, contents, contentscksum) VALUES (vindbase_operator.m
+obily_vb_script_worklist_inc.nextval,?,?,to_date(?,'YYYY-MM-DD H
H24:MI:SS'),?,?,?,?)");
or download this
my $sth = $dbh->prepare("INSERT INTO vindbase_operator.mobily_vb_
+script_worklistv2 (worklistid, emstype, submitserver, submitdate, sub
+mitowner, state, contents, contentscksum) VALUES (vindbase_operator.m
+obily_vb_script_worklist_inc.nextval,?,?,to_date(?,'YYYY-MM-DD H
H24:MI:SS'),?,?,?,?)") or die $dbh->errstr;