CPAN::Groonga

 (undef)

=item * L<JPL::Class> (undef)

=item * L<JPL::Compile> (undef)

=item * L<JSON::PP> (undef)

=item * L<JSON::PP::Boolean> (undef)

=item * L<List::Util> (1.22)

=item * L<List::Util::PP> (1.

 (undef)

=item * L<JPL::Class> (undef)

=item * L<JPL::Compile> (undef)

=item * L<JSON::PP> (2.94)

=item * L<JSON::PP::Boolean> (2.94)

=item * L<List::Util> (1.48)

=item * L<List::Util::PP> (unde

ndef)

=item * L<JPL::Class> (undef)

=item * L<JPL::Compile> (undef)

=item * L<JSON::PP> (2.27400_02)

=item * L<JSON::PP::Boolean> (undef)

=item * L<List::Util> (1.46_02)

=item * L<List::Util::PP

(undef)

=item * L<JPL::Class> (undef)

=item * L<JPL::Compile> (undef)

=item * L<JSON::PP> (2.27202)

=item * L<JSON::PP::Boolean> (undef)

=item * L<List::Util> (1.27)

=item * L<List::Util::PP> (u

(undef)

=item * L<JPL::Class> (undef)

=item * L<JPL::Compile> (undef)

=item * L<JSON::PP> (2.97001)

=item * L<JSON::PP::Boolean> (2.97001)

=item * L<List::Util> (1.50)

=item * L<List::Util::PP> 

age PONAPI::CLI::RunQuery;

use strict;
use warnings;

use JSON::MaybeXS;
use HTTP::Tiny;

sub run {
    my ( $port, $query_string, $only_json ) = @_;

    my $url = $query_string || random_url( $port

= HTTP::Tiny->new->get( $url, {
        headers => {
            'Accept' => 'application/vnd.api+json',
        },
    });

    die "Failed to connect to a local server (try 'ponapi demo -s' to start

one)\n"
        unless $res and ref($res) eq 'HASH' and $res->{status} < 500;

    unless ( $only_json ) {
        print "\nGET $url\n\n";
        print $res->{protocol} . " " . $res->{status} . " " .

(undef)

=item * L<JPL::Class> (undef)

=item * L<JPL::Compile> (undef)

=item * L<JSON::PP> (2.27200)

=item * L<JSON::PP::Boolean> (undef)

=item * L<List::Util> (1.23)

=item * L<List::Util::PP> (1

: []
  },
);

sub old_meta {
  my $meta = try {
    CPAN::Meta->load_file("META.json");
  }
  catch {
    warn "META.json could not be read, using fallback meta. Error:\n $_";
    return { version => 

Version' => { major => $self->major_version } ] if $is_release;

  my @generated_files = qw( META.json Makefile.PL cpanfile );
  my @on_release_files = ( qw/dist.ini Changes README.pod perlcritic.rc/,

ackage' => { meta_noindex => 1 } ], # AFTER MetaNoIndex
    'MetaYAML',           # core
    'MetaJSON',           # core

  # build system
    'ExecDir',            # core
    'ShareDir',           #

/Build.bat
/Makefile
/_build
/.build
/blib
/cover_db
/pm_to_blib
/PM_to_blib
/MYMETA.yml
/MYMETA.json
/{{ $dist->name }}-*

@@ README.PATCHING
README.PATCHING

Thank you for considering contributing 

 to test any
patches you have.

You may need to satisfy some dependencies.  See the included META.json
file for a list.  If you install App::mymeta_requires from CPAN, it's easy
to satisfy any that yo

ndef)

=item * L<JPL::Class> (undef)

=item * L<JPL::Compile> (undef)

=item * L<JSON::PP> (2.27400_02)

=item * L<JSON::PP::Boolean> (undef)

=item * L<List::Util> (1.46_02)

=item * L<List::Util::PP

(undef)

=item * L<JPL::Class> (undef)

=item * L<JPL::Compile> (undef)

=item * L<JSON::PP> (2.27203)

=item * L<JSON::PP::Boolean> (undef)

=item * L<List::Util> (1.39)

=item * L<List::Util::PP> (u

(undef)

=item * L<JPL::Class> (undef)

=item * L<JPL::Compile> (undef)

=item * L<JSON::PP> (2.27200)

=item * L<JSON::PP::Boolean> (undef)

=item * L<List::Util> (1.25)

=item * L<List::Util::PP> (1

 (undef)

=item * L<JPL::Class> (undef)

=item * L<JPL::Compile> (undef)

=item * L<JSON::PP> (undef)

=item * L<JSON::PP::Boolean> (undef)

=item * L<List::Util> (1.22)

=item * L<List::Util::PP> (1.

wd ();
use Convos::Core;
use Convos::Util;
use File::HomeDir ();
use Mojo::File 'path';
use Mojo::JSON qw(false true);
use Mojo::Util;

$ENV{CONVOS_PLUGINS} //= 'Convos::Plugin::Paste';

our $VERSION 

atic->file('convos-api.json');
  die "Could not find convos-api.json in static=@{$self->static->paths}, home=@{[$self->home]})"
    unless $file;
  return Mojo::JSON::decode_json($file->slurp);
};

ha

fig = $self->config;

  if (my $path = $ENV{MOJO_CONFIG}) {
    $config = $path =~ /\.json$/ ? $self->plugin('JSONConfig') : $self->plugin('Config');
  }

  $config->{backend} ||= $ENV{CONVOS_BACKEND}

ndef)

=item * L<JPL::Class> (undef)

=item * L<JPL::Compile> (undef)

=item * L<JSON::PP> (2.27300_01)

=item * L<JSON::PP::Boolean> (undef)

=item * L<List::Util> (1.41)

=item * L<List::Util::PP> (

ce: "
                    . $self->type
                    . " => "
                    . $self->json->encode( $self->data )
        );

        $doc->set_status(201) unless $doc->has_status;

      

       and negative values: "no", 0 & "false"

server:
  spec_version:            "1.0"        # {json:api} version
  sort_allowed:            "false"      # server-side sorting support
  send_version

map(qq< INSERT INTO articles (title, body, created, updated, status) VALUES $_>,
             q<("JSON API paints my bikeshed!", "The shortest article. Ever.",
              "2015-05-22 14:56:29", "20

ttp://jsonapi.org/format/#crud-updating-relationship-responses-204
    # Basically, we return a 204, UNLESS it's an ->update() call, in which
    # case it has to return a 404:
    # http://jsonapi.or

in "/" => grep defined, '', @{$self}{qw/type id rel_type/} );

    return $link . " => " . $self->json->encode( $self->data );
}

no PONAPI::Constants;
no Moose::Role; 1;

__END__

=pod

=encoding UTF

 *

meta_json_conforms_to_known_spec

Does META.json conform to the recognised META.json specification?
(For specs see L<CPAN::Meta::Spec>)

=item *

meta_json_is_parsable

Can the F<META.json> be par