my $n = 0;
while ( $n < scalar @array ) {
    my $sql = "SELECT blah FROM blah WHERE blah = $array[$n++]
}