examples/clan/lib/My/Project.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 15 | 15 | 100.0 |
branch | n/a | ||
condition | n/a | ||
subroutine | 7 | 7 | 100.0 |
pod | 0 | 1 | 0.0 |
total | 22 | 23 | 95.6 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | 1 | 1 | 319 | use strict; | |||
1 | 1 | ||||||
1 | 23 | ||||||
2 | 1 | 1 | 3 | use warnings; | |||
1 | 1 | ||||||
1 | 28 | ||||||
3 | |||||||
4 | package My::Project; | ||||||
5 | |||||||
6 | 1 | 1 | 275 | use My::Project::Logger; | |||
1 | 1 | ||||||
1 | 7 | ||||||
7 | |||||||
8 | sub import { | ||||||
9 | 1 | 1 | 6 | log_trace { 'import called' }; | |||
1 | 1 | 8 | |||||
10 | } | ||||||
11 | |||||||
12 | sub run { | ||||||
13 | 1 | 1 | 0 | 6 | log_trace { 'running' }; | ||
1 | 1 | 14 | |||||
14 | 1 | 294 | require My::Project::Library; | ||||
15 | 1 | 3 | My::Project::Library->run; | ||||
16 | } | ||||||
17 | |||||||
18 | 1; |