File Coverage

blib/lib/Mo/importer.pm
Criterion Covered Total %
statement 5 5 100.0
branch 1 2 50.0
condition n/a
subroutine 1 1 100.0
pod n/a
total 7 8 87.5


line stmt bran cond sub pod time code
1             package Mo::importer;my$M="Mo::";
2             $VERSION=0.38;
3 1 50   1   3 *{$M.'importer::e'}=sub{my($P,$e,$o,$f)=@_;(my$pkg=$P)=~s/::$//;&{$P.'importer'}($pkg,@$f)if defined&{$P.'importer'}};
  1         6  
  1         2  
  1         5  
  1         8