I was attempting something very simple:

$ mysqladmin create test
mysql> create table t ( name varchar(64) );

#!/usr/bin/perl -w
use DBIx::Recordset;
my $db = new DBIx::Database ( { '!DataSource' => 'DBI:mysql:test',
                                '!Username' => 'jason',
                                '!Password' => 'xxx',
                                '!KeepOpen' => 1 } );


Output:
DBD::mysql::st execute failed: Table 'test.`t`' doesn't exist at 
/usr/share/perl5/DBIx/Compat.pm line 81.
Cannot list fields for `t` (Table 'test.`t`' doesn't exist) at /home/jason/perl/db.pl 
line 3

Versions:

perl        => 5.8.3-2
mysql       => 4.0.18-2
DBIx        => 0.24-7   (libdbix-recordset-perl)
DBD::mysql  => 0.7.1-2  (libdbd-mysql)
DBD::mysql  => 2.9003-2 (libdbd-mysql-perl)

  All of the above on a Debian system.


I added the following line in DBIx/Database.pm

line 642: 
$stab =~ s/`//g;

And it worked again.

Regards,

--
Jason Armstrong

Reply via email to