File Coverage

blib/lib/XML/Reader/RS.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             package XML::Reader::RS;
2            
3 4     4   5116 use 5.014;
  4         15  
  4         155  
4            
5 4     4   24 use strict;
  4         8  
  4         147  
6 4     4   32 use warnings;
  4         13  
  4         186  
7            
8 4     4   5711 use XML::Reader 0.48 qw(XML::Parser slurp_xml);
  4         55770  
  4         34  
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             my $class = shift;
18             XML::Reader->new(@_);
19             }
20            
21             1;
22            
23             __END__