Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Output results from a DBI select query in one line

by mjg (Beadle)
on Apr 11, 2006 at 15:47 UTC ( #542573=snippet: print w/ replies, xml ) Need Help??

Description: I'm finding myself using this idiom a lot for a current project. Adjust to taste for your own applications.
# given a DBI handle $dbh, a database table "foo" with a column "bar"

print join "\n", map join("\t", @$_), @{$dbh->selectall_arrayref( q{
   select bar from foo
} )};
Comment on Output results from a DBI select query in one line
Download Code
Replies are listed 'Best First'.
Re: Output results from a DBI select query in one line
by merlyn (Sage) on Apr 11, 2006 at 16:12 UTC
      Or, a couple of characters shorter than that (if we don't count loading Dumper):
      print Dumper $dbh->selectall_arrayref("SELECT one, two FROM three WHER +E four=? AND five=?",{},4,5);
        Either merlyn's or jZed's examples are fine for diagnostics. The original, however:
        • won't truncate values as dump_results does
        • provides more human-readable output than Data::Dumper's structures
        But feel free to use whatever works for you. Mine was just more appropriate for my project.

Back to Snippets Section

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (17)
As of 2015-07-28 20:55 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (259 votes), past polls