Help for this page

Select Code to Download

Select or download this

my @deletable_ids = qw( 1 2 3 );
my $delete_at_a_time = 100;
...
    my $in_clause = join q{,}, @delete_now;
    $dbh->do( "DELETE FROM t WHERE blah IN ($in_clause)" );
}

Select or download this

    my $qmarks = join q{,}, map { '?' } @delete_now;
    $dbh->do( "DELETE FROM t WHERE blah IN ($qmarks)",
              undef, @delete_now );