view release on metacpan or  search on metacpan

lib/App/DBBrowser/Options/Defaults.pm  view on Meta::CPAN

            export_dir       => $sf->{i}{home_dir},
            add_extension    => 0,
            default_filename => 0,
            file_encoding    => 'UTF-8',
        },
        csv_out => {
            auto_diag => 1,  # not an option, always 1

            sep_char    => ',',
            quote_char  => '"',
            escape_char => '"',
            eol         => '',
            undef_str   => '',

            always_quote => 0,
            binary       => 1,
            escape_null  => 1,
            quote_binary => 1,
            quote_empty  => 0,
            quote_space  => 1,
        },
        connect_data => {
            host_required => 1,
            port_required => 1,
            user_required => 1,
            pass_required => 1,
            host => '',
            port => '',
            user => '',
            use_dbi_host => 0,
            use_dbi_port => 0,
            use_dbi_user => 0,
            use_dbi_pass => 0,
        },
        connect_attr => {
            ChopBlanks  => 0,
            LongTruncOk => 0,
            LongReadLen => 80,
        },
    };
    if ( $driver eq 'SQLite' ) {
        $defaults->{connect_attr}{sqlite_see_if_its_a_number} = 1;
        $defaults->{connect_attr}{sqlite_string_mode}         = 5;
        $defaults->{connect_attr}{sqlite_busy_timeout}        = 30000;
    }
    elsif ( $driver eq 'mysql' ) {
        $defaults->{connect_attr}{mysql_enable_utf8}        = 0;
        $defaults->{connect_attr}{mysql_enable_utf8mb4}     = 1;
        $defaults->{connect_attr}{mysql_bind_type_guessing} = 1;
    }
    elsif ( $driver eq 'MariaDB' ) {
        $defaults->{connect_attr}{mariadb_bind_type_guessing} = 1;
    }
    elsif ( $driver eq 'Pg' ) {
        $defaults->{connect_attr}{pg_enable_utf8} = -1;
    }
    elsif ( $driver eq 'Firebird' ) {
        $defaults->{connect_attr}{ib_enable_utf8} = 1;
        $defaults->{connect_attr}{ib_dialect}     = '';
        $defaults->{connect_attr}{ib_role}        = '';
        $defaults->{connect_attr}{ib_charset}     = 'UTF8';
    }
    elsif ( $driver eq 'Oracle' ) {
        $defaults->{connect_attr}{ora_charset} = 'AL32UTF8';
        $defaults->{connect_attr}{AskIfSID}    = 0;
    }
    elsif ( $driver eq 'DB2' ) {
    }
    elsif ( $driver eq 'Informix' ) {
        $defaults->{connect_attr}{ix_EnableUTF8} = 1;
    }
    elsif ( $driver eq 'ODBC' ) {
        $defaults->{connect_attr}{odbc_utf8_on}                   = 0;
        $defaults->{connect_attr}{odbc_ignore_named_placeholders} = 0;
       #$defaults->{connect_attr}{odbc_array_operations}          = 0;
        $defaults->{connect_attr}{odbc_batch_size}                = 10;
    }
    elsif ( $driver eq 'DuckDB' ) {
    }
    return $defaults;
}





1;


__END__