my $bindvars = join(",", ("?") x scalar @values); my $sql = <prepare_cached($sql) || die; $sth->execute(@values) || die; ...