File Coverage

blib/lib/Shipwright/Base.pm
Criterion Covered Total %
statement 9 9 100.0
branch 1 2 50.0
condition n/a
subroutine 3 3 100.0
pod n/a
total 13 14 92.8


line stmt bran cond sub pod time code
1             package Shipwright::Base;
2              
3 15     15   105 use warnings;
  15         28  
  15         429  
4 15     15   67 use strict;
  15         24  
  15         877  
5              
6             our @ISA;
7             require Class::Accessor::Fast;
8              
9             BEGIN {
10 15     15   43 eval { require Class::XSAccessor::Compat };
  15         3548  
11 15 50       68272 push @ISA, $@ ? 'Class::Accessor::Fast' : 'Class::XSAccessor::Compat' ;
12             }
13              
14             =head1 NAME
15              
16             Shipwright::Base - Base
17              
18             1;
19              
20             __END__