return columns and rows

diff --git a/lib/APKPM/Store.pm b/lib/APKPM/Store.pm
index e4463c0..423bd0a 100644 (file)
--- a/lib/APKPM/Store.pm
+++ b/lib/APKPM/Store.pm
@@ -54,7 +54,7 @@ sub ping : Job : MinProcesses(1) : MaxProcesses(5) : Decode(d_json) {
        $self->pg_insert(ping => $workload);
 }
 
-sub sql : Job : MinProcesses(1) : MaxProcesses(5) : Decode(d_array) : Encode(e_json) {
+sub sql : Job : MinProcesses(1) : MaxProcesses(5) : Encode(e_json) {
        my ( $self, $job, $workload ) = @_;
 
        my $sth = $self->dbh->prepare($workload);
@@ -62,7 +62,10 @@ sub sql : Job : MinProcesses(1) : MaxProcesses(5) : Decode(d_array) : Encode(e_j
 
        warn "# $rows rows get_username_table $workload\n";
 
-       return $sth->fetchall_arrayref;
+       return {
+               columns => $sth->{NAME},
+               rows => $sth->fetchall_arrayref,
+       };
 }
 
 1;