use DBI;
my $dbh = DBI->connect('dbi:AnyData(RaiseError=>0):');
$dbh->func( 't_labels', 'CSV', '/tmp/demo_labels.csv', 'ad_catalog' );
my $query = qq!SELECT id,name from t_labels!;
my $sth   = $dbh->prepare($query);
$sth->execute();
while ( my $row = $sth->fetchrow_hashref ) {
    print $row->{name}, "\n";
}