"Creating a database handle....snip"

use DBI;
use DBI::CSV;

my $dbh = DBI->connect( "DBI:CSV:");