Help for this page
my $query = sprintf('SELECT recno, body FROM body WHERE recno IN (%s)' +, join ',', map {$_ = '?'} @recnos); ... $sth->execute(@recnos);
my $query = sprintf('SELECT recno, body FROM body WHERE recno IN (%s)' +, join ',', ('?') x @recnos); ... $sth->execute(@recnos);