my $dbh = DBI->connect( "dbi:ODBC:home", "", "", {RaiseError => 1, PrintError => 1, AutoCommit => 1} ) or die "Unable to connect: " . $DBI::errstr . "\n"; $dbh->{LongReadLen} = 20000 ; # to better handle long variables