Select Code to Download

use DBI;
my ($dbh, $data) = (undef, '');
...
 $dbh->disconnect();
};
print "Error : $@" if length $@;

testdb=# \d btest
         Table "btest"
...
 id        | integer | not null
 data      | text    |
Index: btest_id_key

DBD::ODBC::st execute failed: Error while executing the query;
ERROR:  Unterminated quoted string (SQL-S1000)
ERROR:  Unterminated quoted string (SQL-S1000)(DBD: st_execute/SQLExec
+ute err=-1
) at C:\Perl\dev\rdm\btest.pl line 12.