#!/usr/bin/perl --
use strict; use warnings;
use edi_mysql;

use Carp::Always;


Main( @ARGV );
exit( 0 );

sub Main {
    my @forDbi  = (
        'dbi:SQLite:dbname=temp.test.sqlite',
        'username',
        'password',
    );
    
    my $csvargsHashref = {
        quote_char          => '"',
        sep_char            => ":", # no more split /\:/
        allow_loose_escapes => 1,
        empty_is_undef      => 1,
        binary              => 1,
        auto_diag           => 1,
    };
        
    edi_mysql::insert_tab(
        \@forDbi,
        [
            'tablename',
            'tab1', # column name
            'tab2', # column name
        ],
        '/data14/docs/konvdocs/ebookkto.txt.old',
        $csvargsHashref,
    );
}