develooper Front page | perl.dbi.users | Postings from February 2001

Re: script retrieval of column names

Thread Previous
From:
Mike<mickalo>Blezien
Date:
February 23, 2001 10:09
Subject:
Re: script retrieval of column names
Message ID:
0t8d9tolc19iotn2dbgcl241jhc842ec6j@4ax.com
On Fri, 23 Feb 2001 09:53:47 -0800, Robb Garrioch <robb_g@mindspring.com>
wrote:

Robb,

Here's a snip that may help:
        # do the SELECT query here....

	$sth->execute ();

	# get column names to use for labels

	@label = @{$sth->{NAME}};
	for ($i=0;  $i<@label; $i++) 
          {
          print qq|Column Name: $label[$i]|;
          }

You can also for case by using NAME_lc(lowercase) or NAME_uc(uppercase)...

Hope this helps

Mickalo
>>Does anyone know of a DBI method ~or~ MySQL specific way that would
>>retrieve the column names of a MySQL database.table dynamically within a
>>Perl script using DBI? or Oracle if known.
>>
>>Thanks for any info!
>>
>>Robb
>>
>>

Thunder Rain Internet Publishing
Providing Internet Solutions that work!
http://www.thunder-rain.com
Tel: 1(225) 686-2002















Thread Previous


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About