Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine

Re: DBD: bind_column behviour with multiple "unnamed" columns

by gmax (Abbot)
on Aug 06, 2004 at 13:36 UTC ( #380530=note: print w/replies, xml ) Need Help??

in reply to DBD: bind_column behviour with multiple "unnamed" columns

I was not able to replicate the behavior you describe. I don't have MS-SQL server, but I tried your code on a MySQL ad a SQLite table, and it works as advertised, i.e. the data comes as I expect and the field names in $sth->{NAME} contain exactly what I put in my select statement, with or without alias.

I can confirm you that fetch is actually fetching an arrayref, as you can see by yourself if you set a line with DBI->trace(4); before your loop. In my test, I get something like this:

fetch for DBD::SQLite::st fetch= [ 'xx' 'yy' 'zz' ] row1 at line 24

The DBI docs give:

       $ary_ref = $sth->fetchrow_arrayref;
       $ary_ref = $sth->fetch;    # alias

My guess is that your DBD driver is not playing according to DBI rules.

 _  _ _  _  
(_|| | |(_|><

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (3)
As of 2021-06-21 04:56 GMT
Find Nodes?
    Voting Booth?
    What does the "s" stand for in "perls"? (Whence perls)

    Results (98 votes). Check out past polls.