Why do I keep getting data truncated errors in my Perl?

If you are getting truncation errors when retrieving data, check what the column data type is. Perl DBI needs to be told about long columns, otherwise, the data gets truncated. Do this just after a DBI->connect call with:

$dbh->{LongReadLen} = 32768; # an example big number