On the line which currently reads:

while (INPUT)

..you are missing a set of angle brackets. That is, it should say..

while (<INPUT>)

You might want to consider doing your connect() call outside of the loop, rather than doing it over and over, though, That, and the voices in my head that keep chanting "use strict; use strict; use strict;"..

Update: Forgot to mention placeholders, as well.

Update 2: I keep looking at the code and seeing more things. I probably shouldn't have been as hasty in my first posting. ;> In any case, the following lines probably don't do what you want them to do:

    @row=$sth1->fetchrow_array();
    foreach ("$row\n" eq "$field1\n")
            {

[download]

That retrieves one row from your SQL query, and throws it away. It then checks if the string "$row\n" (and $row is undefined) is equal ro the string "$field1\n". Not knowing what you are trying to do, it's hard for me to suggest corrected code, but that's most probably not what you meant. ;>

perl -pe '"I lo*`+$^X$\"$]!$/"=~m%(.*)%s;$_=$1;y^`+*^e v^#$&V"+@( NO CARRIER'

In reply to Re: Updating Specific Fields in MS Access by Chmrr
in thread Updating Specific Fields in MS Access by Anonymous Monk

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.