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; | ||||||
2 | $Mo::importer::VERSION = '0.40';my$M="Mo::"; | ||||||
3 | $VERSION='0.40'; | ||||||
4 | 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 | 6 | ||||||
1 | 17 |