File Coverage

blib/lib/XML/Reader/PP.pm
Criterion Covered Total %
statement 10 12 83.3
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 14 16 87.5


line stmt bran cond sub pod time code
1             package XML::Reader::PP;
2             $XML::Reader::PP::VERSION = '0.04';
3 1     1   601 use 5.014;
  1         3  
  1         31  
4              
5 1     1   4 use strict;
  1         1  
  1         28  
6 1     1   4 use warnings;
  1         1  
  1         31  
7              
8 1     1   198 use XML::Reader 0.48 qw(XML::Parsepp slurp_xml);
  0            
  0            
9              
10             require Exporter;
11             our @ISA = qw(Exporter);
12             our @EXPORT = qw();
13             our @EXPORT_OK = qw(slurp_xml);
14              
15             sub new {
16             my $class = shift;
17             XML::Reader->new(@_);
18             }
19              
20             1;
21              
22             __END__