| line |
true |
false |
branch |
|
14
|
37 |
5 |
scalar @_ == 1 ? : |
|
40
|
67 |
174 |
defined $args{$accessor} ? : |
|
43
|
3 |
238 |
$args{"build_$accessor"} ? : |
|
45
|
1 |
238 |
unless (defined $value) |
|
63
|
41 |
1 |
if (defined $value) |
|
64
|
1 |
40 |
if (ref $value) |
|
74
|
47 |
48 |
if (defined $value) |
|
75
|
1 |
46 |
if ((ref $value || '') ne "HASH") |
|
85
|
44 |
274 |
if (defined $value) |
|
86
|
4 |
40 |
if ((ref $value || '') ne "HASH") |
|
96
|
42 |
24 |
if (defined $value) |
|
97
|
2 |
40 |
if ((ref $value || '') ne "HASH") |
|
107
|
40 |
24 |
if (defined $value) |
|
108
|
1 |
39 |
if (ref $value) |
|
118
|
41 |
15 |
if (defined $value) |
|
119
|
1 |
40 |
if ((ref $value || '') ne "HASH") |
|
129
|
0 |
1 |
if ((ref $hash || '') ne "HASH") |
|
130
|
0 |
0 |
defined $hash ? : |
|
156
|
3 |
5 |
if ((ref $hash || '') ne "HASH") |
|
157
|
2 |
1 |
defined $hash ? : |
|
176
|
2 |
15 |
if ((ref $hash || '') ne "HASH") |
|
177
|
1 |
1 |
defined $hash ? : |
|
185
|
8 |
14 |
if ($ref eq 'HASH') { } |
|
|
4 |
10 |
elsif ($ref eq 'ARRAY') { } |
|
210
|
2 |
6 |
if ((ref $array || '') ne "ARRAY") |
|
211
|
1 |
1 |
defined $array ? : |
|
218
|
5 |
7 |
if ($ref eq 'HASH') { } |
|
|
1 |
6 |
elsif ($ref eq 'ARRAY') { } |
|
236
|
4 |
24 |
if ((ref $new || '') ne "HASH") |
|
237
|
3 |
1 |
defined $new ? : |
|
250
|
4 |
1 |
if ((ref $methods || '') ne "ARRAY") |
|
251
|
3 |
1 |
defined $methods ? : |
|
263
|
4 |
60 |
if ((ref $method || '') ne "HASH") |
|
264
|
3 |
1 |
defined $method ? : |
|
268
|
2 |
58 |
if (not defined $method->{'name'} or ref $method->{'name'}) |
|
269
|
1 |
1 |
defined $method->{'name'} ? : |
|
275
|
21 |
37 |
if ($method->{'clearer'}) |
|
279
|
1 |
57 |
if ($method->{'predicate'}) |
|
283
|
1 |
57 |
if ($method->{'get'}) |
|
287
|
14 |
44 |
if ($method->{'set'}) |
|
290
|
10 |
4 |
if $method->{'autotype'} |
|
291
|
11 |
3 |
if ($method->{'type'}) |
|
295
|
10 |
4 |
$method->{'merge'} ? : |
|
319
|
10 |
4 |
if $method->{'nested'} |
|
326
|
1 |
57 |
if ($method->{'ref'}) |
|
330
|
1 |
57 |
if ($method->{'reftype'}) |
|
334
|
24 |
34 |
if (exists $method->{'default'}) |
|
337
|
55 |
3 |
unless ($method->{'code'}) |
|
364
|
1 |
12 |
if (defined $self->{'array'}) |
|
|
5 |
17 |
if (defined $self->{'bed'}) |
|
|
2 |
10 |
if (defined $self->{'duvet'}) |
|
|
3 |
15 |
if (defined $self->{'info'}) |
|
|
6 |
27 |
if (defined $self->{'info'}) |
|
|
7 |
41 |
if (defined $self->{'mat'}) |
|
|
1 |
3 |
if (defined $self->{'name'}) |
|
|
1 |
5 |
if (defined $self->{'name'}) |
|
|
1 |
4 |
if (defined $self->{'room'}) |
|
|
2 |
4 |
if (defined $self->{'rooms'}) |
|
365
|
1 |
23 |
if ($@) |
|
373
|
1 |
59 |
unless defined $struct |
|
374
|
28 |
34 |
ref $struct ? : |
|
384
|
2 |
13 |
if (not defined $value or ref $value) |
|
385
|
1 |
2 |
defined $value ? : |
|
396
|
2 |
16 |
unless defined $value |
|
398
|
2 |
10 |
$type_map->{$ref} ? : |
|
|
6 |
8 |
if $ref |
|
399
|
1 |
8 |
if $value =~ /\d+\.\d+/ |
|
400
|
1 |
6 |
if $value =~ /\d+/ |
|
401
|
4 |
3 |
if $value =~ /\w+/ |