CPAN::Groonga

method( $url =>
      ( ( ref($body) eq 'HASH' || ref($body) eq 'ARRAY' ) ? 'json' : ( { 'Content-Type' => 'application/json' } ) ) =>
      $body )->then( sub($tx) {
    return ( $self->response($tx)

response->code );
  $self->message( $self->_response->message );
  $self->data( $self->_response->json );

  if ( !$self->success && ( $self->data && $self->data->{error} ) ) {
    $self->error( $self

package OpenSearch::Helper;
use strict;
use warnings;
use Moo::Role;
use JSON::XS;
use Data::Dumper;
use feature qw(signatures);
no warnings qw(experimental::signatures);

$Carp::Verbose = 1;

my $fun

  as_is        => sub { my $value = shift; return ($value); },
  encode_json  => sub { my $value = shift; return ( encode_json($value) ); },
  encode_bool  => sub { my $value = shift; return ( define

ue = shift;
    my $bulk  = [];
    foreach my $item ( @{$value} ) {
      push( @{$bulk}, encode_json($item) );
    }
    return ( join( "\n", @{$bulk} ) . "\n" );
  },
};

sub _generate_params( $sel