my $dbh = DBI->connect ("dbi:CSV:", undef, undef, {
    PrintError    => 1,
    RaiseError    => 1,

    f_dir         => ".",
    f_ext         => ".csv/r",
    f_schema      => undef,

    csv_null      => 1,
    csv_auto_diag => 1,
    });