Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic

Re: Perl/MySQL

by matija (Priest)
on Feb 12, 2005 at 20:34 UTC ( #430494=note: print w/ replies, xml ) Need Help??

in reply to Perl/MySQL

You'll find it easier to user fetchrow_hashref for this purpose, like this:

while ($row=$sth->fetchrow_hashref) { foreach $col (%{$row}) { print "$col: ".$$row{$col}."\n"; } }
Edit: I made a stupid mistake: it should be
foreach $col (keys %{$row}) {

Comment on Re: Perl/MySQL
Select or Download Code
Re^2: Perl/MySQL
by Anonymous Monk on Feb 15, 2005 at 14:12 UTC
    Thanks for all your help.

    I have found a small problem in the code suggested by majita. It appears to print the field name and the value, then on the next line, it prints the value again?

    Name: tony tony: Address: 10 downing st 10 downing st: Tel: 00000000000 000000000: Email:

    wheres the problem?

    Cheers, Marcel

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (5)
As of 2015-03-05 06:43 GMT
Find Nodes?
    Voting Booth?

    When putting a smiley right before a closing parenthesis, do you:

    Results (136 votes), past polls