my $sql;
{ 
  my @values = ('?') x @columns; # I love that, BTW...
  local $" = ',';
  $sql = "INSERT INTO $table (@columns) VALUES (@values)";
}
$dbh->prepare($sql) or die("Couldn't prepare $sql " . $dbh->errstr);