Yet Another CPAN Grep

Rewire ( A/AW/AWNCORP/Rewire-0.06.tar.gz, AWNCORP, 2021; MetaCPAN )

Rewire/lib/Rewire.pm ( view source; MetaCPAN )

es;

use Data::Object::Class;
use Data::Object::ClassHas;
use Data::Object::Space;

use Carp;
use JSON::Validator;
use Rewire::Engine;

with 'Data::Object::Role::Buildable';
with 'Data::Object::Role::

lidate() {
  my $engine = $self->engine;

  my $json = JSON::Validator->new;

  $json->schema($engine->call('ruleset'));

  my @errors = map "$_", $json->validate($self->config);

  confess join "\n",

Rewire ( A/AW/AWNCORP/Rewire-0.06.tar.gz, AWNCORP, 2021; MetaCPAN )

Rewire/lib/Rewire/Ruleset.pm ( view source; MetaCPAN )

 "https://raw.githubusercontent.com/cpanery/rewire/master/ruleset.yaml",
  "\$schema" => "https://json-schema.org/draft/2019-09/schema",
  definitions => {
    Argument => {
      anyOf => [
        {

 "number",
    },
    ArgumentObject => {
      additionalProperties => bless( do{\(my $o = 0)}, 'JSON::PP::Boolean' ),
      minProperties => 1,
      patternProperties => {
        "^\\\$[A-Za-z_][A

type => "string",
    },
    Service => {
      additionalProperties => bless( do{\(my $o = 0)}, 'JSON::PP::Boolean' ),
      minProperties => 1,
      not => {
        anyOf => [
          {

Rewire ( A/AW/AWNCORP/Rewire-0.06.tar.gz, AWNCORP, 2021; MetaCPAN )

Rewire/lib/Rewire/Engine.pm ( view source; MetaCPAN )

gistry;
use routines;

use Data::Object::Space;

use Scalar::Util ();

# FUNCTIONS

# returns the json-schema-based engine ruleset
fun ruleset() {

  state $ruleset = require Rewire::Ruleset;
}

# ret