Perl Script : Fetching CLOB Columns

Hi All,
 
I have a perl script that calls a sp in TD. The SP returns rows where each row has 4 clob columns.
I am using the following code scrippet to fetch the row and facing issue.

my $mod_query = $retrow->{mod_query1}."" .$retrow->{mod_query2}."" .$retrow->{mod_query3}."" .$retrow->{mod_query4};

The perl throws the following error :

DBD::ODBC::st fetchrow_hashref failed: st_fetch/SQLFetch (long truncated DBI attribute LongTruncOk not set and/or LongReadLen too small) (SQL-HY000) [state was HY000 now 01004]
[Teradata][ODBC Teradata Driver] Unable to get catalog string. (SQL-01004)
[Teradata][ODBC Teradata Driver] Unable to get catalog string. (SQL-01004)
[Teradata][ODBC Teradata Driver] Unable to get catalog string. (SQL-01004)
[Teradata][ODBC Teradata Driver] Unable to get catalog string. (SQL-01004)

The same code works fine where the variables are varchar ,etc.
Appreciate any help in this regard.