}
push @resrows, $resrow;
}
require JSON::MaybeXS;
$buf = JSON::MaybeXS::encode_json([200, "OK", \@resrows]);
} elsif ($type eq 'bar') {
$chart
a L<tchart> (from L<App::tchart>) CLI:
% tchart -d sales -t sparkline < celine-dion-album-sales.json
▂▂▅██▄▄▂▁▂▁
B<Horizontal sparkline chart:>
XXX
C<Plotting multiple dat