Maybe you could try to encode the results from your queries to utf8 in your script.

...
use Encode qw ( from_to );
...
my @row = $stmt->fetchrow_array();
map{ from_to($_, "latin1","utf8"); } @row;
...
[download]