Sorry to bug you so much :o)
I did that this is like the code looks like
use DBI;
my $dbhX = DBI->connect("DBI:XBase:/proyecto");
my $dbhA = DBI->connect('dbi:AnyData(RaiseError=>1):');
$dbhA->ad_catalog('etstx','CSV','etstx.csv');
my $sth = $dbhX->prepare("SELECT * FROM reg501");
$sth->execute();
$dbhA->do("CREATE TABLE etstx AS SELECT * FROM ?",{}, $sth);
and I run it and it send a very long error message :
SQL ERROR: Bad table or column name '?' has chars not alphanumeric or
+underscore!
DBD::AnyData::db do failed: SQL ERROR: Bad table or column name '?' ha
+s chars not alphanumeric or underscore!
Can't call method "execute" on an undefined value at C:/Perl/site/lib/
+SQL/Statement.pm line 254.
[for Statement "SELECT * FROM ?"] at testdbf.pl line 8.
DBD::AnyData::db do failed: SQL ERROR: Bad table or column name '?' ha
+s chars not alphanumeric or underscore!
Can't call method "execute" on an undefined value at C:/Perl/site/lib/
+SQL/Statement.pm line 254.
[for Statement "SELECT * FROM ?"] at testdbf.pl line 8.
