Select Code to Download

my $dbh = DBI->connect(qq{DBI:CSV:csv_eol=\n;csv_sep_char=\\,;});   
$dbh->{'csv_tables'}->{'Table'} = {'file' => 'data.csv','col_names' =>
+ 
...
$sth->execute();
$sth->finish();
$dbh->disconnect();