my $str = join ',', map { $dbh->quote($_,'VARCHAR') } @values;
my $str = join ',', map { "'$_'"                    } @values;