If your form field names and the database field names are the same (something I've always found handy) you can do something like this: 
  my $Form = new CGI;
  my $Vars = $Form->Vars;

  my @Fields =  qw(short_descr class_id long_descr contact_org contact
+_web chapter_id contact_name contact_phone contact_email est_value ot
+her comments);

  my $InsertCmd = "insert into item (" . join (",",@Fields) . ") value
+s(" .  join ( ",", map { "'$Vars->{ $_ }'" } @Fields ) . ")";

  $hDB->do ( $InsertCmd ) || die "DBI failed: $DBI::errstr";

[download]
This takes fields from the form, builds an insert statement and executes it. This was one of those situations where map was really called for.

(In the interest of brevity I've not included all of the error checking, connecting to the database, various comments etc.)

"Excellent. Release the hounds." -- Monty Burns.

In reply to Re: Undescribed problem with Win32::OLE by talexb
in thread Undescribed problem with Win32::OLE by MiRaGe 508

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.