...
  my $data= $dbh->selectall_arrayref($sql, { Slice => {} });
  for (@$data) {
    # This is a workaround for the incorrect
    # character set declared on the table.
    utf8::decode($_->{my_textcol});
  }
  ...