Help for this page

Select Code to Download


  1. or download this
    my $fields = join ', ', keys %{$form->field};
my $values = join ', ', map {$dbh->quote($_)} values %{$form->field};
  2. or download this
    
my $fields = join ', ', keys %{$form->field};
...
my $sql = qq| INSERT INTO mytable ($fields) VALUES ($placeholders); |;
my $st = $dbh->prepare($sql);
$st->execute(@values);