Help for this page

Select Code to Download

Select or download this

 foreach $addr (@addr){
    $addr_lookup = "SELECT u2addr.id FROM u2addr WHERE u2addr.addr = \
+"$addr\";";
    $stm = $dbh->prepare($addr_lookup);
...
    $stm->finish;
    print $results[-1];
    }

Select or download this

while (my ($uid_value) = $stm->fetchrow_array){
      print "$uid_value, ";
    }#End of While