my $res = $sth->fetchall_arrayref;

print Dumper $res;

##</code><code>##

use JSON;
my $json = to_json($res);