Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change
 
PerlMonks  

Re: Perl DBI - returning a single value

by CountZero (Bishop)
on Sep 25, 2012 at 18:57 UTC ( #995616=note: print w/ replies, xml ) Need Help??


in reply to Perl DBI - returning a single value

You will have to do some more reading of the DBI docs.

They say about selectall_arrayref:

This utility method combines "prepare", "execute" and "fetchall_arrayref" into a single call. It returns a reference to an array containing a reference to an array (...snip...) for each row of data fetched.
As your SQL never returns more than one row with one field, you are probably rather looking for selectrow_array:
This utility method combines "prepare", "execute" and "fetchrow_array" into a single call. If called in a list context, it returns the first row of data from the statement.
So you code becomes:
my ($Count_A_ANY) = $dbh_B->selectrow_array( ... your SQL here ... );
How you link the first part of your code to the second part is a profond mystery to me, so I abstain from commenting.

CountZero

A program should be light and agile, its subroutines connected like a string of pearls. The spirit and intent of the program should be retained throughout. There should be neither too little or too much, neither needless loops nor useless variables, neither lack of structure nor overwhelming rigidity." - The Tao of Programming, 4.1 - Geoffrey James

My blog: Imperial Deltronics


Comment on Re: Perl DBI - returning a single value
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://995616]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (9)
As of 2014-08-21 17:34 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (139 votes), past polls