File Coverage

blib/lib/WWW/Ohloh/API/Role/LoadXML.pm
Criterion Covered Total %
statement 12 14 85.7
branch 0 2 0.0
condition n/a
subroutine 4 5 80.0
pod n/a
total 16 21 76.1


line stmt bran cond sub pod time code
1             package WWW::Ohloh::API::Role::LoadXML;
2             our $AUTHORITY = 'cpan:YANICK';
3             $WWW::Ohloh::API::Role::LoadXML::VERSION = '1.0.2';
4 38     38   192366 use strict;
  38         96  
  38         1674  
5 38     38   219 use warnings;
  38         80  
  38         2321  
6              
7 38     38   941 use Object::InsideOut;
  38         46886  
  38         354  
8              
9             my %init_args : InitArgs = ( 'xml' => '', );
10              
11             sub _init : Init {
12 0     0     my ( $self, $args ) = @_;
13              
14 0 0         $self->load_xml( $args->{xml} ) if $args->{xml};
15 38     38   7586 }
  38         103  
  38         332  
16              
17             1;
18              
19             __END__