my @question_marks = ('?') x @columns;

##</code><code>##

        else {
            local $" = ', ';
            $sth = $dbh->prepare(
                       "INSERT INTO $table (@columns) VALUES (@question_marks)"
                   );
            $sth->execute(@csv_values);
        }