e 'Mojolicious::Controller';
sub add
{
my ($self) = @_;
my $data = $self->req->json;
if ($data)
{
if (!$ENV{HARNESS_ACTIVE}) {
BenchmarkAnything - REST API - data submit
=head2 add
Parameters:
=over 4
=item * JSON request body
If a JSON request is provided it is interpreted as an array of
BenchmarkAnything data points ac
_id = $self->param('value_id');
my $query = $self->req->json;
if ($value_id) {
$self->render(json => $self->app->backend->get_single_benchmark_point($value_id));
{
$self->render(json => $self->app->backend->search_array($query));
}
else
{
$self->render(json => []);
}
}
sub listnames
{
my $answer = $self->app->backend->list_benchmark_names(@pattern);
$self->render(json => $answer);
}
sub listkeys
{
my ($self) = @_;
my $pattern = $self->param('pat