$dbhC->{csv_tables}->{outTable} = {
    file     => 'foo/bar.csv',
    sep_char => "\t",
    eol      => '\012',
};

##</code><code>##

#!/usr/bin/perl
use warnings;
use strict;
use DBI;

my $dbhX = DBI->connect('dbi:XBase(RaiseError=1):');
my $dbhC = DBI->connect('dbi:CSV(RaiseError=1):');
my $select = $dbhX->prepare("SELECT * FROM inTable");
$select->execute();
$dbhC->do("CREATE TABLE outTable AS IMPORT(?)",{},$select);

__END__