http://www.perlmonks.org?node_id=640261


in reply to DBD::Oracle 's DBI binding of arrays

You could use quote(): 

my @userArray = qw(batman robin joker);
my $set = join(",", map { $dbh->quote($_) } @userArray);
my $sql = "select * from tablename where username IN ($set)";
# ...

[download]

duff

In Section Seekers of Perl Wisdom