use DBI; my $dbh=DBI->connect('dbi:CSV:'); my $AoA =[ ['number','name','sex','age'], ['0','Jack','M','28'], ['1',"Marry",'F','29'] ]; $dbh->do("CREATE TABLE worksheet AS IMPORT(?)",{},$AoA); __END__ #### DBD::CSV::db do failed: You passed 1 parameters where 0 required [for Statement "CREATE TABLE worksheet AS IMPORT(?)"] at 443517.pl line 6.