blib/lib/Test/Count/Base.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 11 | 11 | 100.0 |
branch | n/a | ||
condition | n/a | ||
subroutine | 3 | 3 | 100.0 |
pod | 1 | 1 | 100.0 |
total | 15 | 15 | 100.0 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | package Test::Count::Base; | ||||||
2 | $Test::Count::Base::VERSION = '0.1105'; | ||||||
3 | |||||||
4 | 4 | 4 | 1569 | use strict; | |||
4 | 7 | ||||||
4 | 110 | ||||||
5 | 4 | 4 | 19 | use warnings; | |||
4 | 5 | ||||||
4 | 297 | ||||||
6 | |||||||
7 | |||||||
8 | sub new | ||||||
9 | { | ||||||
10 | 37 | 37 | 1 | 22642 | my $class = shift; | ||
11 | 37 | 72 | my $self = {}; | ||||
12 | |||||||
13 | 37 | 100 | bless $self, $class; | ||||
14 | 37 | 180 | $self->_init(@_); | ||||
15 | |||||||
16 | 37 | 215 | return $self; | ||||
17 | } | ||||||
18 | |||||||
19 | 1; | ||||||
20 | |||||||
21 | __END__ |