File Coverage

blib/lib/XML/Reader/PP.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 1 0.0
total 19 20 95.0


line stmt bran cond sub pod time code
1             package XML::Reader::PP;
2            
3 4     4   14477 use 5.014;
  4         18  
  4         154  
4            
5 4     4   25 use strict;
  4         9  
  4         143  
6 4     4   44 use warnings;
  4         8  
  4         2076  
7            
8 4     4   6256 use XML::Reader 0.48 qw(XML::Parsepp slurp_xml);
  4         67860  
  4         33  
9            
10             require Exporter;
11             our @ISA = qw(Exporter);
12             our @EXPORT = qw();
13             our @EXPORT_OK = qw(slurp_xml);
14             our $VERSION = '0.02';
15            
16             sub new {
17 90     90 0 883457 my $class = shift;
18 90         510 XML::Reader->new(@_);
19             }
20            
21             1;
22            
23             __END__