mysql - perl - 如果列词丢失则插入值

Question

在 perl 中，如果

我想插入缺失的行

database 1                               database 2
-----------------------------------      ----------------------------------
table truc                               table truc2
-----------------------------------      ----------------------------------
   parti                                 id   parti missing_line
-----------------------------------     ----------------------------------
   MODEM                                14   MODEM   0
   EELV                                 33   EELV    0
   SP                                    2   SP      0
   CPNT                                  3   CPNT    0

5 分钟后，pati 列中的 SP 和 MODEM 丢失，如果列中的任何单词丢失，我想插入 1:

database 1                               database 2
-----------------------------------      ----------------------------------
table truc                               table truc2
-----------------------------------      ----------------------------------
   parti                                id   parti missing_line
-----------------------------------     ----------------------------------
                                        14   MODEM   1
   EELV                                 33   EELV    0
                                         2   SP      1
   CPNT                                  3   CPNT    0

感谢您的回复，

我的perl和sql代码是here

Answer 1

像这样的东西看起来应该可以工作(但我没有时间测试它):

UPDATE database2.truc2 t2
SET t2.missing_line = 1
WHERE t2.parti NOT IN
(SELECT t1.parti FROM database1.truc t1);