my $dbh = DBI->connect($dsn, $user, $pass, { mysql_enable_utf8 => 1 });
...
   push @$rows, [@row];
...
binmode STDOUT, ":encoding(utf-8)";
print Text::Table::Tiny::table(rows => $rows, header_row => 1);