File Coverage

blib/lib/Mo/xxx.pm
Criterion Covered Total %
statement 3 19 15.7
branch n/a
condition n/a
subroutine 1 2 50.0
pod n/a
total 4 21 19.0


line stmt bran cond sub pod time code
1             package Mo::xxx;my$M="Mo::";
2             $VERSION='0.12';
3 1     1   1955 use constant XXX_skip=>1;my$dm='YAML::XS';*{$M.'xxx::e'}=sub{my($P,$e)=@_;$e->{WWW}=sub{require XXX;local$XXX::DumpModule=$dm;XXX::WWW(@_)};$e->{XXX}=sub{require XXX;local$XXX::DumpModule=$dm;XXX::XXX(@_)};$e->{YYY}=sub{require XXX;local$XXX::DumpModule=$dm;XXX::YYY(@_)};$e->{ZZZ}=sub{require XXX;local$XXX::DumpModule=$dm}};
  1     0   2  
  1         299  
  0            
  0            
  0            
  0            
  0            
  0            
  0            
  0            
  0            
  0            
  0            
  0            
  0            
  0            
  0            
  0