[rt.cpan.org #20282] Bug in column_info: quotes not removed

"Guest via RT" <[email protected]> Tue, 4 Jul 2006 19:45:28 -0400 (EDT)

Newsgroups	gmane.comp.db.postgresql.dbdpg
Message-ID	<[email protected]>

       Queue: DBD-Pg
 Ticket <URL: http://rt.cpan.org/Ticket/Display.html?id=20282 >

I've tweaked the example a little:
  my $aa;
  my $sth=$dbh->column_info("mydatabase","public",$table,"%");
  my %fields=%{$sth->fetchall_hashref("COLUMN_NAME")};
  %fields=map {$aa=$_;s/^"(.*)"$/$1/g;$_=>$fields{$aa}} keys %fields;
  print Dumper(\%fields);

This is perl 5.8.8, perl-DBD-Pg-1.49-1.FC5.i386.rpm from Fedora Core 5.