/tmp/eVTsxXaC8k | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 6 | 6 | 100.0 |
branch | n/a | ||
condition | n/a | ||
subroutine | 2 | 2 | 100.0 |
pod | n/a | ||
total | 8 | 8 | 100.0 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | my $order = 0; | ||||||
2 | |||||||
3 | package MyTest; | ||||||
4 | 2 | 2 | 5065067 | use Mite::Shim; | |||
2 | 15 | ||||||
2 | 59 | ||||||
5 | extends 'MyTest::Parent'; | ||||||
6 | has third => | ||||||
7 | is => 'ro', | ||||||
8 | default => sub { ++$order }; | ||||||
9 | has fourth => | ||||||
10 | is => 'ro', | ||||||
11 | default => sub { ++$order }; | ||||||
12 | |||||||
13 | package MyTest::Parent; | ||||||
14 | 2 | 2 | 931 | use Mite::Shim; | |||
2 | 4 | ||||||
2 | 9 | ||||||
15 | has first => | ||||||
16 | is => 'ro', | ||||||
17 | default => sub { ++$order }; | ||||||
18 | has second => | ||||||
19 | is => 'ro', | ||||||
20 | default => sub { ++$order }; | ||||||
21 | |||||||
22 | 1; |