i've tried and failed many times to get Class::DBI to work with a CSV file by using the DBD::AnyData driver. i finally tracked down the solution to the last error:

Can't locate object method "select_row" via package "DBI::st" at /usr/
+lib/perl5/site_perl/5.8.2/Class/DBI.pm line 780.
[download]

seems the DBIx::ContectualFetch module provides the needed function.

package TableName;
use base 'Class::DBI';

my $dbh = DBI->connect(
    "dbi:AnyData:",
    undef, undef,
    {
        RootClass => 'DBIx::ContextualFetch',
        ShowErrorStatement => 1,
        RaiseError => 1,
        AutoCommit => 1,
        PrintError => 1,
        Taint => 1,
        FetchHashKeyName => '"NAME_lc"',
        ChopBlanks => 1,
    });

$dbh->func( 'tablename', 'CSV', 'filename.csv', { field_sep => q(\\^) 
+}, 'ad_catalog');

# this instead of __PACKAGE__->set_db( ... )
sub db_Main { return $dbh; }

__PACKAGE__->table( 'tablename' );
__PACKAGE__->columns( All => qw/ ip sysDescr / );

1;
[download]

with that last bit Class::DBI seems to play nicely with CSV files.

edit (broquaint): changed <pre> tags around error message to <code> tags