blib/lib/Data/Object/Autobox/Composite/String.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 12 | 14 | 85.7 |
branch | n/a | ||
condition | n/a | ||
subroutine | 4 | 6 | 66.6 |
pod | 0 | 2 | 0.0 |
total | 16 | 22 | 72.7 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | package Data::Object::Autobox::Composite::String; | ||||||
2 | |||||||
3 | 2 | 2 | 1986 | use 5.010; | |||
2 | 4 | ||||||
2 | 62 | ||||||
4 | 2 | 2 | 7 | use strict; | |||
2 | 3 | ||||||
2 | 54 | ||||||
5 | 2 | 2 | 9 | use warnings; | |||
2 | 3 | ||||||
2 | 46 | ||||||
6 | |||||||
7 | 2 | 2 | 8 | use Data::Object::Class 'with'; | |||
2 | 2 | ||||||
2 | 10 | ||||||
8 | |||||||
9 | with 'Data::Object::Role::String'; | ||||||
10 | |||||||
11 | sub data { | ||||||
12 | 0 | 0 | 0 | goto &detract; | |||
13 | } | ||||||
14 | |||||||
15 | sub detract { | ||||||
16 | 0 | 0 | 0 | return shift; | |||
17 | } | ||||||
18 | |||||||
19 | 1; |