my $dbh = DBI->connect ("dbi:CSV:", undef, undef, {
    f_dir      => "DEMO.db:",
    f_ext      => ".csv/r",
    f_schema   => undef,
    PrintError => 1,
    RaiseError => 1,
    });