Hello,
Can I have multiple prepare/executes DBI statements with in a loop -
or will this cause some problems?
I have a list loaded from <PA> - it is a bunch of names and addresses.
I am checking to see if they are in the database. If so - update
them.
....<previous code connects to database OK and variable
defined>.......
print "Selecting.... \n";
$sth=$dbh->prepare("SELECT name,address_number from many_address
WHERE name=?
AND number=?
AND street=? ");
while ($_=<PA>) {
($name,$add,$street)=split(/\|/,$_);
chomp ($name,$add,$street);
$name = '' unless defined $name;
$sth->execute($name,$add,$street);
#$rec=$sth->dump_results(); ### see results
@rec = $sth->fetchrow_array();
if (@rec) { ### check to see if @res is valued
print "$name $add,$street --> @rec. \n";
$sth=$dbh->prepare("UPDATE many_address
SET name=NULL,
date_loaded=NULL
WHERE name=?
AND number=?
AND street=? ");
$sth->execute($name,$add,$street);
print "Clearing $name,$add,$street -->@rec
\n";
}
else {
print " Not available -->@rec is \n";
}
}
close(PA);
This code executes with no errors - too bad it changes t nothing.
I think having multiple prepare statement is the loop are getting
confused?
I was thinking of collecting all the @rec values into another array - the looping through it later - outside them main loop.
But can you push an array on to another array.
i.e. push (@new_array,@rec);
I tried it for fun but since @rec hold 2 values, @new_array considers each value a separate element.
i.e. @rec looks like "jim 10"
@new_array treats it as "jim"
"10"
help?
Any suggestions?
Thanks,
He who laughs last, doesn't get the joke.
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: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.