将 Perl bind_param 与 SQL IN 语句结合使用

Question

可能的重复：
是否有数组的 SQL 参数绑定？

我想知道是否有 无论如何，将bind_param 与SQL IN 语句一起使用。根据perl文档bind_param_array也不能使用。有人遇到过同样的情况吗？

http://search.cpan.org/perldoc?DBI#bind_param_array

Answer 1

不，你不能轻易做到这一点。一种选择是使用 $dbh->quote，例如。

my @values = (1,2,3,4);
my $sql = "SELECT * from my_table WHERE ID IN (";
$sql .= join(',', map { $dbh->quote($_) } @values)
$sql .= ')';

或者您可以创建必要的占位符并将数组作为绑定参数传递，例如。

my @values = (1,2,3,4);
my $sql = "SELECT * from my_table WHERE ID IN (";
$sql .= join(',', map { '?' } @values);
$sql .= ')';

my $sth = $dbh->prepare($sql);
$sth->execute(@values);

两者都不是特别漂亮。

Answer 2

如果您想要任意数量的占位符，则不行。您可以将它与 IN 一起使用，如 in

where foo in ( ?, ?, ? )

所示，但是您必须恰好具有三个绑定。