my $dbh = DBI->connect('dbi:Pg:dbname=dipl','dpavlin','', { RaiseError => 1, AutoCommit => 0 });
my $data = $dbh->selectall_arrayref(q{
- select sum(ttc),ca from citirani group by ca order by sum desc ;
+ select sum(ttc),ca,count(ca) from citirani group by ca order by count asc ;
});
print "var data = ",to_json(
# [ map { $_->[0] } @$data ]