File Coverage

blib/lib/JSONY.pm
Criterion Covered Total %
statement 20 20 100.0
branch n/a
condition n/a
subroutine 8 8 100.0
pod 0 2 0.0
total 28 30 93.3


line stmt bran cond sub pod time code
1 3     3   179640 use strict; use warnings;
  3     3   25  
  3         92  
  3         15  
  3         4  
  3         126  
2             package JSONY;
3              
4 3     3   1315 use version;
  3         5748  
  3         17  
5             our $VERSION = '0.1.21'; $VERSION = version->declare("v$VERSION");
6              
7 3     3   1967 use Pegex::Parser;
  3         38826  
  3         96  
8 3     3   1469 use JSONY::Grammar;
  3         9  
  3         22  
9 3     3   1355 use JSONY::Receiver;
  3         10  
  3         319  
10              
11             sub new {
12 2     2 0 266 bless {}, $_[0];
13             }
14              
15             sub load {
16 2     2 0 26 Pegex::Parser->new(
17             grammar => JSONY::Grammar->new,
18             receiver => JSONY::Receiver->new,
19             # debug => 1,
20             )->parse($_[1]);
21             }
22              
23             1;