File Coverage

blib/lib/Test2/Harness/Util/File/JSON.pm
Criterion Covered Total %
statement 23 23 100.0
branch 1 2 50.0
condition n/a
subroutine 10 10 100.0
pod 0 4 0.0
total 34 39 87.1


line stmt bran cond sub pod time code
1             package Test2::Harness::Util::File::JSON;
2 1     1   147461 use strict;
  1         2  
  1         25  
3 1     1   4 use warnings;
  1         2  
  1         35  
4              
5             our $VERSION = '0.001007';
6              
7 1     1   4 use Carp qw/croak/;
  1         2  
  1         46  
8 1     1   267 use Test2::Harness::Util::JSON qw/encode_json decode_json encode_pretty_json/;
  1         2  
  1         56  
9              
10 1     1   221 use parent 'Test2::Harness::Util::File';
  1         229  
  1         4  
11 1     1   43 use Test2::Harness::Util::HashBase qw/pretty/;
  1         2  
  1         3  
12              
13 1     1 0 6 sub decode { shift; decode_json(@_) }
  1         5  
14 1 50   1 0 6 sub encode { shift->pretty ? encode_pretty_json(@_) : encode_json(@_) }
15              
16 1     1 0 182 sub reset { croak "line reading is disabled for json files" }
17 1     1 0 651 sub read_line { croak "line reading is disabled for json files" }
18              
19             1;
20              
21             __END__