使用inet_aton的Perl

Question

我的脚本是：

foreach (@missing) {
    my $ipdone = $_;
    $sth = $dbh->prepare("UPDATE tbl_ips SET searched=\'1\' WHERE ip = '$ipdone'");
    $sth->execute();
}

现在我们在mysql中更改了ip，所以它是inet_aton格式，所以我们想：

("UPDATE tbl_ips SET searched=\'1\' WHERE ip = inet_aton('$ipdone')");

但我不能让它发挥作用。

我该怎么做？

Answer 1

“无法使其工作”是什么样的？会发生什么？

我能想到的一件事可能会使原始查询起作用，但如果$ipdone有尾随空格，那么替换不会这样做; ip = '$ipdone'将选择的内容将被忽略，但会导致mysql的inet_aton返回NULL。