| line |
true |
false |
branch |
|
13
|
37 |
5 |
scalar @_ == 1 ? : |
|
39
|
67 |
181 |
defined $args{$accessor} ? : |
|
42
|
3 |
245 |
$args{"build_$accessor"} ? : |
|
44
|
1 |
245 |
unless (defined $value) |
|
62
|
42 |
1 |
if (defined $value) |
|
63
|
1 |
41 |
if (ref $value) |
|
73
|
49 |
48 |
if (defined $value) |
|
74
|
1 |
48 |
if ((ref $value || '') ne "HASH") |
|
84
|
45 |
274 |
if (defined $value) |
|
85
|
4 |
41 |
if ((ref $value || '') ne "HASH") |
|
95
|
43 |
24 |
if (defined $value) |
|
96
|
2 |
41 |
if ((ref $value || '') ne "HASH") |
|
106
|
42 |
24 |
if (defined $value) |
|
107
|
1 |
41 |
if (ref $value) |
|
117
|
41 |
15 |
if (defined $value) |
|
118
|
1 |
40 |
if ((ref $value || '') ne "HASH") |
|
128
|
0 |
1 |
if ((ref $hash || '') ne "HASH") |
|
129
|
0 |
0 |
defined $hash ? : |
|
155
|
3 |
5 |
if ((ref $hash || '') ne "HASH") |
|
156
|
2 |
1 |
defined $hash ? : |
|
175
|
2 |
15 |
if ((ref $hash || '') ne "HASH") |
|
176
|
1 |
1 |
defined $hash ? : |
|
184
|
8 |
14 |
if ($ref eq 'HASH') { } |
|
|
4 |
10 |
elsif ($ref eq 'ARRAY') { } |
|
209
|
2 |
6 |
if ((ref $array || '') ne "ARRAY") |
|
210
|
1 |
1 |
defined $array ? : |
|
217
|
5 |
7 |
if ($ref eq 'HASH') { } |
|
|
1 |
6 |
elsif ($ref eq 'ARRAY') { } |
|
235
|
4 |
24 |
if ((ref $new || '') ne "HASH") |
|
236
|
3 |
1 |
defined $new ? : |
|
249
|
4 |
1 |
if ((ref $methods || '') ne "ARRAY") |
|
250
|
3 |
1 |
defined $methods ? : |
|
262
|
4 |
60 |
if ((ref $method || '') ne "HASH") |
|
263
|
3 |
1 |
defined $method ? : |
|
267
|
2 |
58 |
if (not defined $method->{'name'} or ref $method->{'name'}) |
|
268
|
1 |
1 |
defined $method->{'name'} ? : |
|
274
|
21 |
37 |
if ($method->{'clearer'}) |
|
278
|
1 |
57 |
if ($method->{'predicate'}) |
|
282
|
1 |
57 |
if ($method->{'get'}) |
|
286
|
14 |
44 |
if ($method->{'set'}) |
|
289
|
10 |
4 |
if $method->{'autotype'} |
|
290
|
11 |
3 |
if ($method->{'type'}) |
|
294
|
10 |
4 |
$method->{'merge'} ? : |
|
318
|
10 |
4 |
if $method->{'nested'} |
|
325
|
1 |
57 |
if ($method->{'ref'}) |
|
329
|
1 |
57 |
if ($method->{'reftype'}) |
|
333
|
24 |
34 |
if (exists $method->{'default'}) |
|
336
|
55 |
3 |
unless ($method->{'code'}) |
|
363
|
1 |
2 |
if (defined $self->{'array'}) |
|
|
2 |
3 |
if (defined $self->{'bed'}) |
|
|
2 |
2 |
if (defined $self->{'duvet'}) |
|
|
1 |
3 |
if (defined $self->{'info'}) |
|
|
1 |
12 |
if (defined $self->{'info'}) |
|
|
4 |
17 |
if (defined $self->{'mat'}) |
|
|
1 |
2 |
if (defined $self->{'name'}) |
|
|
1 |
3 |
if (defined $self->{'name'}) |
|
|
1 |
5 |
if (defined $self->{'room'}) |
|
|
2 |
6 |
if (defined $self->{'rooms'}) |
|
364
|
1 |
23 |
if ($@) |
|
372
|
1 |
64 |
unless defined $struct |
|
373
|
29 |
42 |
ref $struct ? : |
|
379
|
2 |
17 |
if (not defined $value or ref $value) |
|
380
|
2 |
4 |
defined $value ? : |
|
391
|
1 |
15 |
unless defined $value |
|
393
|
2 |
8 |
$type_map->{$ref} ? : |
|
|
11 |
33 |
if $ref |
|
394
|
7 |
46 |
if $value =~ /\d+\.\d+/ |
|
395
|
1 |
8 |
if $value =~ /\d+/ |
|
396
|
5 |
5 |
if $value =~ /\w+/ |