Select Code to Download

DBD::CSV::db do failed: Can't call method "fetchrow_array" on unblesse
+d reference at C:/Perl/site/lib/SQL/Statement/Functions.pm line 560.

...

Can't use an undefined value as an ARRAY reference at C:/Perl/site/lib
+/SQL/Statement.pm line 264.
 [for Statement "SELECT * FROM IMPORT (?)"] at testdbf4.pl line 20.

while ( my $row = $sth->fetch) {

 print "data es $row->[2].csv\n";

 $dbhC->do("CREATE TABLE $row->[2] AS IMPORT(?)",{},$select);

#!/usr/bin/perl
use warnings;
...


}