Help for this page
my $sql = "SELECT foo FROM Bar WHERE 1=1"; my @bind; $sql .= " AND baz in ( " . join(',', map {'?'} @ins) . ") "; push @bind, @ins; $dbh->selectall_arrayref($sql, {}, @bind);
use SQL::Abstract; my $SA = SQL::Abstract->new; my ($sql, @bind) = $SA->select('Bar', ['foo'], {baz => \@ins}); $dbh->selectall_arrayref($sql, {}, @bind);