perl 怎么控制 update 重复更新

发布网友发布时间：2024-10-05 12:43

共1个回答

热心网友时间：2024-12-02 11:41

不行的原因是什么？就光看你现在的程序，显然是不对的，应该报语法错，SQL最后没有双引号，而且你这个看上去是两条SQL语句，而且perl字符串中间也不允许换行。如果非要换行，可以使用qq~的形式，即：

1
2
3
4
5
6
7
8
$shareresult = $conn->execute_sql(qq~
INSERT INTO tmp_xk_stop_info(custid, servid, pid)
SELECT 0, servid, pid
FROM biz_proct
WHERE etime >= TRUNC(sysdate +$i)
AND etime < TRUNC(sysdate + 1 + $i);
~);
$shareresult = $conn->execute_sql("update tmp_xk_stop_info set stopdate = trunc(sysdate + 1 +$i - 1/24/60/60");

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com