Many thanks,
the trick

my $values = join(",",map { $dbh->quote($_) } @values);
[download]

worked well.

I will have to read up on both the ",map" part of the join statement you supplied and the $dbh->quote($_) function of DBI :)
Thank you