File Coverage

blib/lib/JSON/Schema/Draft201909.pm
Criterion Covered Total %
statement 26 26 100.0
branch n/a
condition n/a
subroutine 9 9 100.0
pod n/a
total 35 35 100.0


line stmt bran cond sub pod time code
1 5     5   2249903 use strict;
  5         43  
  5         156  
2 5     5   26 use warnings;
  5         11  
  5         246  
3             package JSON::Schema::Draft201909; # git description: v0.028-4-ge32be9d
4             # vim: set ts=8 sts=2 sw=2 tw=100 et :
5             # ABSTRACT: (DEPRECATED) Validate data against a schema
6             # KEYWORDS: JSON Schema data validation structure specification
7              
8             our $VERSION = '0.128';
9              
10 5     5   103 use 5.016; # for fc, unicode_strings features
  5         16  
11 5     5   26 no if "$]" >= 5.031009, feature => 'indirect';
  5         11  
  5         71  
12 5     5   249 no if "$]" >= 5.033001, feature => 'multidimensional';
  5         10  
  5         28  
13 5     5   205 no if "$]" >= 5.033006, feature => 'bareword_filehandles';
  5         8  
  5         26  
14 5     5   687 use strictures 2;
  5         1527  
  5         188  
15 5     5   1536 use Moo;
  5         6804  
  5         41  
16 5     5   3277 use namespace::clean;
  5         14531  
  5         44  
17              
18             extends 'JSON::Schema::Modern';
19              
20             around BUILDARGS => sub {
21             my ($orig, $class, @args) = @_;
22              
23             return $class->$orig(
24             @args == 1 && ref $args[0] eq 'HASH' ? %{$args[0]} : @args,
25             specification_version => 'draft2019-09',
26             );
27             };
28              
29             1;
30              
31             __END__
32              
33             =pod
34              
35             =encoding UTF-8
36              
37             =head1 NAME
38              
39             JSON::Schema::Draft201909 - (DEPRECATED) Validate data against a schema
40              
41             =head1 VERSION
42              
43             version 0.128
44              
45             =head1 DESCRIPTION
46              
47             This module is deprecated in favour of L<JSON::Schema::Modern>. It is a simple subclass of that module,
48             adding C<< specification_version => 'draft2019-09' >> to the constructor call to allow existing code
49             to continue to work.
50              
51             =for Pod::Coverage BUILDARGS
52              
53             =head1 SEE ALSO
54              
55             =over 4
56              
57             =item *
58              
59             L<JSON::Schema::Modern>
60              
61             =item *
62              
63             L<https://json-schema.org>
64              
65             =item *
66              
67             L<RFC8259: The JavaScript Object Notation (JSON) Data Interchange Format|https://tools.ietf.org/html/rfc8259>
68              
69             =item *
70              
71             L<RFC3986: Uniform Resource Identifier (URI): Generic Syntax|https://tools.ietf.org/html/rfc3986>
72              
73             =item *
74              
75             L<Test::JSON::Schema::Acceptance>: contains the official JSON Schema test suite
76              
77             =item *
78              
79             L<JSON::Schema::Tiny>: a more minimal implementation of the specification, with fewer dependencies
80              
81             =item *
82              
83             L<https://json-schema.org/draft/2019-09/release-notes.html>
84              
85             =item *
86              
87             L<Understanding JSON Schema|https://json-schema.org/understanding-json-schema>: tutorial-focused documentation
88              
89             =back
90              
91             =head1 SUPPORT
92              
93             Bugs may be submitted through L<https://github.com/karenetheridge/JSON-Schema-Draft201909/issues>.
94              
95             I am also usually active on irc, as 'ether' at C<irc.perl.org> and C<irc.libera.chat>.
96              
97             =head1 AUTHOR
98              
99             Karen Etheridge <ether@cpan.org>
100              
101             =head1 COPYRIGHT AND LICENCE
102              
103             This software is copyright (c) 2020 by Karen Etheridge.
104              
105             This is free software; you can redistribute it and/or modify it under
106             the same terms as the Perl 5 programming language system itself.
107              
108             =cut