12345
my $sql = "INSERT INTO db ("; $sql .= join", ", map {$dbh->quote($_)} keys( %{$ref} ); $sql .= ") VALUES ('"; $sql .= join", ", map {$dbh->quote($_)} values( %{$ref} ); $sql .= "')";